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Preface 


The  investigation  reported  herein  is  the  second  of  two  phases  of  a  project  conducted  by  the 
Hydrologic  Engineering  Center  (HEC)  to  assist  staff  of  the  Missouri  River  Division  (MRD).  The  goal 
of  the  project  is  to  develop  efficient  operation  plans  for  the  six  major  reservoirs  on  the  Missiouri 
River.  Phase  I  began  1  July  1990  and  yielded  HEC-PRM,  a  prescriptive  model  for  system  analysis. 
Phase  II  extends  and  improves  that  model. 

The  project  is  undertaken  in  accordance  with  a  task  order  issued  July  1990  by  MG  Patrick  J. 
Kelly,  Director  of  Civil  Works,  HQUSACE.  HQUSACE  point  of  contact  is  Earl  Eiker,  Chief, 
Hydraulics  and  Hydrology  Branch,  Engineering  Division,  Civil  Works  Directorate.  The  project  is 
funded  jointly  by  MRD,  the  National  Drought  Study,  and  the  Civil  Works  Research  and  Development 
program. 

The  project  is  a  joint  effort  by  HEC  and  the  Institute  for  Water  Resources  (IWR).  IWR  staff  are 
responsible  for  development  of  cost  based  penalty  functions  critical  to  the  analysis.  Reports  of  their 
work  are  published  separately. 

Mike  Burnham,  Chief,  Planning  Analysis  Division,  HEC,  is  project  engineer.  Bob  Carl,  Planning 
Analysis  Division,  HEC,  developed  the  software  and  performed  applications  described  herein.  Other 
HEC  staff  assisting  include  Vem  Bonner,  Marilyn  Hurst,  and  Richard  Hayes.  Darryl  Davis,  Director, 
HEC,  provided  general  supervision  and  guidance  for  the  project. 

HEC  staff  were  assisted  by  the  following  consultants  in  Phase  II  of  this  project:  Prof.  Paul 
Jensen,  University  of  Texas  at  Austin;  Dr.  David  Ford,  Consulting  Engineer;  and  Prof.  Jay  Lund, 
University  of  California,  Davis. 


Chapter  1 

Executive  Summary 


The  six  main-stem  reservoirs  of  the  Missouri  River  system  are  operated  by  the  Corps  of 
Engineers  for  flood  control,  navigation,  irrigation,  power,  water  supply,  water  quality  control, 
recreation,  and  fish  and  wildlife  protection.  Changes  in  supplies  and  changes  in  demands  motivated  a 
review  of  system  operation  policy  by  MRD  staff. 

To  provide  information  for  decision  making  in  this  review,  HEC  developed  a  prescriptive  model. 
This  model,  designated  HEC-PRM,  represents  the  system  as  a  collection  of  nodes  and  links  and  uses 
network-flow  programming  to  allocate  optimally  the  system  water  for  competing  purposes.  This 
approach  was  selected  because  it  satisfies  institutional,  economic,  environmental,  and  engineering 
criteria.  Goals  of  and  constraints  on  system  operation  are  represented  with  penalty  functions.  The 
functions  are  both  cost-based  and  non-cost-based.  The  cost-based  functions  are  developed  by 
evaluating  economic  cost  incurred  or  the  value  of  opportunity  foregone.  The  non-cost  based  functions 
were  developed  to  reflect  environmental  outputs  and  concerns,  regional  priorities  on  type  and  location 
of  outputs,  and  risk-management  objectives.  The  model  is  implemented  on  a  personal  computer 
naming  MS-DOS.  It  makes  extensive  use  of  HEC’s  data  storage  system  (HEC-DSS).  Prior  to 
application  as  a  decision-making  tool  in  the  review,  the  model  was  validated  subjectively  by 
comparing  prescribed  operation  for  a  historical  period. 

Model  development  and  testing  constitute  Phase  I  of  HEC  activities.  Phase  II  of  the  activities 
began  in  January  1991.  Table  1  summarizes  the  proposals  and  accomplishments  for  Phase  II  of  the 

Table  1 

Phase  II  Activities  and  Accomplishments 


Proposal 

Expand  the  system  analyzed 
Refine  the  penalty  functions  used 
Improve  HEC-PRM’s  user  interface 

Make  technical  improvements  to  HEC-PRM 
Complete  additional  Phase  II  analyses 
Transfer  developed  technology  to  MRD  staff 


Accomplishment 

Model  extended  to  St.  Louis  and  expanded  to 
full  hydrologic  record. 

Refinement  generally  lagged  development. 
Flood  control  issue  addressed. 

Character-based  interface  implemented.  This 
provides  additional  display  and  analysis  tools 
via  MATHPK,  DSPLAY,  PRMPOST. 

Significant  improvements  to  network  solver. 
Hydropower  algorithm  formulated. 

Delayed  due  to  unanticipated  delays  in 
development  of  penalty  functions. 

Workshop  held.  Variety  of  reports, 
documents  prepared. 


Missouri  River  System  Analysis. 

As  an  extension  of  the  Phase  II  activities,  HEC  is  reviewing  alternatives  to  enable 
recommendation  of  procedures  for  developing  system  operating  rules  from  HEC-PRM  results.  This 
task  is  necessary  to  bridge  the  gap  between  theory  (the  prescriptive  model)  and  practice  (the  real-world 
system).  Results  are  forthcoming. 

In  calendar  year  1992,  HEC  staff  plan  improvements  to  HEC-PRM  for  other  on-going  studies. 
These  include,  but  are  not  limited  to,  the  following: 

(1)  further  refinement  to  the  user  interface; 

(2)  integration  and  testing  of  the  improved  network  solver;  and 

(3)  implementation  and  testing  of  the  hydropower  algorithm. 

The  goal  is  to  develop  a  general-purpose  model  and  software  that  can  be  applied  on  any  system. 
As  HEC-PRM  is  improved,  updates  will  be  provided  to  MRD. 


Chapter  2 

Hydrologic  Engineering  Center  Prescriptive  Reservoir  Model 


Motivation  for  Model  Development 

System  Description.  In  the  April  2,  1991  issue  of  the  Wall  Street  Journal,  staff  reporter 
Dennis  Famey  wrote  the  following  about  the  Missouri  River: 

Until  recent  decades,  it  was  known  as  "Old  Misery"  -  a  treacherous  stream...  But 
today,  the  Missouri  is  a  blue-collar  river:  harnessed,  dammed  and  channelized  for 
flood  control,  hydroelectric  power,  barges,  and  irrigation.  It  can  generate  2,400 
megawatts  of  electricity  [and]  hold  enough  water  to  supply  Kansas  City  for  the  next 
two  centuries. 

The  Missouri  River  main-stem  reservoir  system  consists  of  six  reservoirs.  Figure  1  shows  the 
location  of  these  reservoirs  and  the  major  streams  in  the  system.  Pertinent  characteristics  of  the 
reservoirs  are  shown  in  Table  2.  Authorized  purposes  for  these  reservoirs  include  flood  control. 


Table  2 

Missouri  River  Reservoir  Characteristics 


Reservoir 

Drainage 

Avg. 

Reservoir 

Total 

Shoreline 

Avg. 

Area 

Total 

Capacity 

Discharge 

Length, 

Annual 

(sq  mi) 

Inflow, 

(cfs) 

(1000  acre-ft) 

Capacity 

(cfs) 

(mi) 

Energy 
(106  kWh) 

Ft.  Peck 

57500 

10200 

18688 

291000 

1520 

1044 

Garrison 

181400 

25600 

23923 

796000 

1340 

2354 

Oahe 

243490 

28900 

23338 

245000 

2250 

2694 

Big  Bend 

249330 

28900 

1874 

373000 

200 

1001 

Ft.  Randall 

263480 

30000 

5574 

680500 

540 

1745 

Gavins  Point 

279480 

32000 

492 

381000 

90 

700 

navigation,  irrigation,  power  generation,  water  supply,  water-quality  control,  recreation,  and  fish  and 
wildlife  protection. 

The  Missouri  River  system  operation  is  based  on  decreasing  priority  for  the  following  purposes: 

(1)  flood  control; 

(2)  all  irrigation,  and  other  upstream  water  uses  for  beneficial  consumptive  purposes; 

(3)  downstream  M&I  water  supply  and  water  quality  requirements; 

(4)  equitable  service  to  navigation  and  power; 

(5)  efficient  generation  of  power  to  meet  the  area's  needs;  and 

(6)  "insofar  as  possible  without  serious  interference  with  the  foregoing  functions.  "  benefit  to 
recreation,  fish  and  wildlife  (USACE.  1979). 


Figure  1 

Missouri  River  Basin  and  Major  Dams 
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Operation  Problems.  A  five-year  drought  in  the  midwestem  United  Slates  has  strained  the 
Missouri  system.  In  early  1991,  the  reservoirs  were  at  near-record  lows.  Oahe  reservoir,  for  example, 
held  less  than  60%  of  its  1986  peak  storage;  the  reservoir  water  surface  was  28  ft  below  the  1986 
level.  As  a  consequence,  upstream  users  were  forced  to  compete  with  downstream  users  for  the 
reduced  supplies.  The  recreation  industry  that  developed  in  North  Dakota,  South  Dakota,  and 
Montana  protested  as  the  system  operator,  the  Corps  of  Engineers,  released  water  from  the  reservoirs 
for  downstream  navigation. 

Missouri  River  Main  Stem  Plan  of  Study.  To  provide  information  for  making  decisions 
regarding  changes  in  Missouri  River  mainstem  operations,  the  Corps  initiated  in  1989  a  formal  review 
of  the  Master  Water  Control  Manual,  the  basic  document  for  operating  the  system.  The  Corps  formed 
a  multidisciplinary  study  team  within  the  Missouri  River  Division  (MRD)  office  and  adopted  a  formal 
plan  of  study  (USACE,  1990a).  The  goal  of  the  study  is  to  determine  if  the  current  plan  or  an 
alternative  plan  for  Missouri  River  mainstem  operations  best  meets  the  current  needs  of  the  basin.  To 
do  this  we  need  to  identify  the  economic,  environmental,  and  social  benefits  of  satisfying  competing 
demands.  Study  team  staff  accepted  early  that  analytical  tools  would  play  a  key  role  in  the  review, 
and  set  out  to  identify  one  or  more  appropriate  reservoir -operation  analysis  tools.  Those  considered 
may  be  classified  broadly  as  descriptive  or  prescriptive.  Yeh  (1985)  has  provided  an  extensive  review 
of  both  categories. 

A  descriptive  tool  would  be  used  to  answer  the  question  "How  would  the  system  perform  if  we 
followed  this  policy  or  set  of  priorities?"  The  alternative  policies  considered  are  proposed  by  a  user. 
MRD  study  staff  proposed  to  conduct  the  study  with  such  a  tool.  The  study  procedure  proposed 
initially  relied  on  L01,  the  MRD  long-range  regulation  simulation  program  (USACE,  undated).  In  the 
lirst  phase  of  the  study, 

the  operation  of  the  main  stem  resen'oir  system  will  be  simulated  over  the  period  of 
record  from  1898  to  the  present  to  provide  a  base  line  condition.  This  base  line 
condition  will  he  analyzed  in  hydrologic,  economic,  and  environmental  terms  to 
identify  issues  and  conflicts.  Alternative  water  control  plans  ...  will  be  formulated  and 
evaluated  in  hydrologic,  economic,  and  environmental  terms.  The  evaluation  of  these 
alternatives  will  identify  which  of  these  plans  favor  each  of  the  main  stem  project  uses 
(USACE.  1990a). 

In  the  second  phase,  MRD  staff  proposed  to  use  the  descriptive  model  to  evaluate  promising 
alternatives  in  further  detail. 

A  prescriptive  tool,  on  the  other  hand,  would  be  used  to  answer  the  question  "How  should  we 
operate  the  system  if  we  accept  this  definition  of  the  goals  of  and  constraints  on  system  operation?"  A 
prescriptive  tool  generates  i  rativcly  the  alternative  policies  to  be  considered  and  evaluates  the 
feasibility  of  each  with  a  built-in  simulation  model.  It  quantifies  the  efficiency  of  each  feasible 
alternative  using  a  formal  definition  of  operation  goals  and  objectives,.  Finally,  after  evaluating  all 
alternatives,  it  identifies  the  best  policy.  Examples  of  prescriptive  tools  are  linear-programming 
models,  nonlinear-programming  models,  and  dynamic-programming  models. 

To  promote  systematic  comparison  of  the  alternative  models,  a  set  of  critical  questions  was 
posed.  These  are  summarized  in  Table  3.  Based  on  consideration  of  these,  HEC  proposed  to  develop 
and  apply  a  prescriptive  model  for  the  Missouri  River  main  stem  study  (USACE.  1991b).  The  most 
compelling  argument  for  proposing  a  prescriptive  model  to  assist  in  studies  was  that  it  would  provide 
i  highh  ellicient  means  for  developing  reasonable  alternative  policies  to  represent  accurately  the 


Table  3 

Criteria  for  Model  Selection 


Institutional  Criteria 


Economic  Criteria 


Environmental  Criteria 


Engineering  Criteria 


Will  the  model  provide  directly  information  that  will  help  solve  the  system- 
operation  problem? 

Can  the  model  represent  all  system  operation  purposes  accurately? 

Can  the  model  evaluate  alternative  priorities  for  system  operation? 

Can  the  model  outputs  be  translated  into  terms  that  are  readily  understandable  to 
users? 

Can  the  model  be  modified  or  expanded  easily  as  more  information  becomes 
available,  as  understanding  of  the  system  operation  improves,  and  as  the  users 
become  more  sophisticated? 

Can  the  model  be  used  on  the  computer  hardware  available  to  users? 

Can  ihe  model  be  implemented  in  time  to  provide  information  for  decision 
making? 


Can  the  model  evaluate  accurately  the  economic  impact  of  operation  decisions? 


Can  the  economic  data  required  for  the  model  be  obtained  with  reasonable 
effort? 


Can  the  model  treat  non-quantifiable  operation  purposes,  such  as  fish  and 
wildlife  protection? 

Can  the  model  represent  adequately  the  requirements  for  endangered  species? 

Does  the  model  use  existing  data  or  data  that  can  be  obtained  with  reasonable 
effort? 

Can  alternative  future  inflow  or  demand  sequences  be  studied  conveniently? 
Can  resuits  from  the  model  be  used  to  evaluate  risk? 

Is  the  technology  embodied  dependable? 

Is  the  model  fast  enough  to  permit  analysis  of  many  alternatives? 


competing  demands. 


Prescriptive  Model  Description 

Mathematical  Formulation.  The  prescriptive  model  developed  by  HEC  addresses  the 
Missouri  River  water  allocation  problem  by: 

(1)  representing  the  physical  system  as  a  network; 

(2)  formulating  the  allocation  problem  as  a  generalized  minimum-cost  network-flow 
programming  problem  [see  Jensen  and  Barnes  (1980)  for  details  of  network-flow 
programming!; 

(3)  developing,  for  various  users  or  purposes,  an  objective  function  that  represents  desirable 
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operation  for  that  user  or  purpose; 

(4)  solving  the  network  problem  with  an  off-the-shelf  solver;  and 

(5)  processing  the  network  results  to  define,  in  convenient  terms,  system  operation. 

The  network  representation  of  the  reservoir  system  is  similar  to  the  approach  used  by  Sigvaldason 
(1976),  Martin  (1982),  Ikura  and  Gross  (1984),  Sabet,  et  al.  (1985),  and  Chung,  el  al.(1989).  The 
network  arcs  represent  any  facilities  for  transfer  of  water  between  points  in  time  or  space.  For 
example,  a  natural  channel  transfers  water  between  two  points  in  space  and  is  represented  by  an  arc. 

A  reservoir  transfers  water  between  two  pomts  in  time;  this  transfer,  too,  is  represented  by  an  arc  of 
the  network.  Network  arcs  intersect  at  nodes.  Flow  is  conserved  at  each  node.  The  nodes  represent 
river  or  channel  junctions,  gage  sites,  monitoring  sites,  dams,  or  water-demand  sites.  To  analyze 
multiple-period  system  operation,  each  site  in  space  is  represented  by  a  node  for  each  time  period. 

Penalty  Functions.  Central  to  the  proposed  approach  (and,  for  that  matter,  to  use  of  any 
prescriptive  model)  is  the  idea  that  goals  of  and  constraints  on  system  operation  can  be  represented 
with  objective  functions.  The  difficulty  in  doing  so  is  well  recognized.  Liebman  (1976)  wrote  of  this 
that  "...human  tastes  are  different-even  with  perfect  knowledge  of  all  effects,  interactions,  and 
implications,  individual  definitions  of  Utopia  would  be  different. ..even  if  there  were  complete 
agreement  on  goals,  ...there  would  still  be  disagreement  over  which  is  the  best  way,  and  even  on  what 
criteria  should  be  used  to  define  best." 

These  differences  in  preferences  and  measures  of  success  were  well  understood  by  the  study 
team.  However,  the  study  goal  is  to  provide  information  to  be  used  to  define  the  best  operation,  not 
to  develop  a  model  that  would  define  the  best  operation.  The  MRD  study  team  and  HEC  felt  that  a 
prescriptive  model  with  alternative  objective  functions,  representing  various  goals  and  various  rankings 
of  goals  would  provide  much  of  this  information.  For  example,  a  purely  economic  objective  function 
with  inviolable  constraints  to  protect  lake  recreation  will  identify  the  cost  of  such  constraints. 

For  this  study,  cost-based  penalty  functions  were  developed  by  MRD  staff  in  cooperation  with 
the  IWR.  The  current  status  of  these  functions  is  described  in  Chapter  3.  The  functions  developed 
can  be  of  two  types:  cost-based  or  non-cost-based.  The  cost-based  functions,  "...show  the  loss  in 
economic  value  as  the  flow  in  each  model  link  deviates  from  the  optimum  flow  (USACE,  1990b)." 
Individual  economic  cost-based  penalty  functions  were  developed  for  the  following  outputs:  urban  and 
agricultural  flooding;  water  supply;  recreation;  hydropower;  and  navigation.  The  functions  relate  cost 
to  either  reservoir  release,  reservoir  storage,  or  channel  flow  at  downstream  locations.  The  functions 
vary  by  month  if  appropriate.  At  this  time,  non-cost-based  penalty  functions  have  not  been  used  in 
this  study.  If  utilized,  they  can  represent  goals  of  system  operation  that  cannot  be  quantified  in 
economic  terms.  For  example,  a  flow  requirement  for  fish  and  wildlife  protection  may  be  represented 
with  a  penalty  function  in  which  the  penalty  arbitrarily  is  set  to  force  the  desired  operation.  As  with 
the  cost-based  functions,  these  functions  relate  penalty  to  cither  reservoir  release,  reservoir  storage,  or 
channel  flow  at  downstream  locations  and  vary  by  month  if  appropriate. 

For  analysis  of  system  operation,  the  penalty  functions  are  summed.  The  non-cost  based 
functions  are  believed  to  be  in  units  commensurate  with  the  cost-based  functions,  enabling  the 
functions  to  be  summed.  Otherwise,  the  functions  can  be  treated  separately.  The  resulting  functions 
are  represented  in  a  pieccwisc-linear  fashion  for  the  network  model.  This  manipulation  of  penalty 
functions  is  described  in  further  detail  in  Chapter  3. 


Software.  Software  to  implement  the  proposed  solution  is  general  purpose.  Figure  2  shows 
schematically  the  components.  These  include  software  to: 

(1)  formulate  the  network; 

(2)  solve  the  minimum-cost  generalized  network; 

(3)  manage  the  data;  and 

(4)  display  and  help  analyze  the  results. 

HEC’s  Prescriptive  Reservoir  Model,  HEC-PRM,  formulates  the  minimum-cost  network-flow 
programming  problem  that  represents  the  system  operation  problem  (USACE,  1991c).  From  the  user’s 
description  of  system  reservoir  storage,  release  facilities,  interconnecting  channels,  diversions,  and 
hydropower  facilities,  the  program  defines  the  network  layout.  HEC-PRM  accesses  flow  data  and 
penalty  functions  stored  in  data  bases  to  define  the  parameters  of  the  network  arcs. 

Several  alternative  solvers  are  available,  depending  on  the  level  of  detail  of  representation  of  the 
reservoir  system.  If  evaporative  losses  are  negligable,  an  out-of -kilter  solver  (Ford  and  Fulkerson, 
1962)  can  be  used  to  solve  the  resulting  pure  network  problem.  Otherwise  the  problem  requires  a 
generalized  network  solver.  Initially,  the  dual  flow-augmentation  solver  developed  by  Jensen  and 
Bhaumik  (1974)  was  used.  This  will  be  replaced  with  an  improved  solver  developed  by  Jensen 
(1991),  as  discussed  in  Chapter  5  of  this  report. 

To  manage  the  mass  of  time-series  and  relational  data  required,  HEC’s  data  storage  system, 
HEC-DSS  (USACE,  1990c),  is  used.  The  software  provides  a  systematic  means  for  organizing, 
storing,  retrieving,  manipulating,  and  sorting  data.  Its  capabilities  are  accessible  via  FORTRAN. 
Program  DSPLAY  graphs  any  of  the  data  stored  with  HEC-DSS,  including  inflow  time  series,  penalty 
functions,  and,  after  solution  of  the  minimum-cost  network  problem,  the  prescribed  release,  storage,and 
flow  time  series.  A  variety  of  utility  programs  manipulate  and  preprocess  data  necessary  for  the 
analysis.  For  example,  a  utility  program  converts  penalty  functions  provided  in  spreadsheet  format  to 
the  HEC-DSS  format.  Another  computes  the  parameters  of  a  piecewise-linear  approximation  of  a 
nonlinear  penalty  function.  These  programs  are  described  in  further  detail  in  Chapter  3. 

Missouri  System  Representation  with  Model.  The  network  representation  of  the  Missouri 
River  main  stem  system  represents  Ft.  Peck,  Garrison,  Oahe,  Big  Bend,  Ft.  Randall,  and  Gavins  Point 
reservoirs  and  non-reservoir  control  points  Sioux  City,  Omaha,  Nebraska  City,  Kansas  City,  Boonville, 
and  Hermann.  This  system  is  shown  by  Figure  3.  Inflows  are  specified  for  each  control  point.  Lake 
evaporation  is  described  as  a  function  of  storage  for  each  reservoir,  and  is  represented  in  the  network 
with  the  arc  multiplier.  The  present  model  was  extended  to  St.  Louis,  Missouri,  on  the  Mississippi 
River. 

Penalty  functions  are  defined  for  storage  in  each  reservoir,  for  release  from  each  reservoir,  and 
for  flow  at  each  of  the  non-reservoir  control  points.  Additional  penalty  functions  for  hydropower  are 
defined  as  a  multivariate  function  of  head  and  release  at  each  reservoir.  For  initial  analysis,  these 
were  simplified  by  assuming  constant  head.  Subsequently,  a  successive  linear  programming  algorithm 
similar  to  that  proposed  by  Grygier  and  Stedinger  (1985)  will  be  implemented  to  eliminate  this 
assumption.  This  algorithm  is  described  in  further  detail  in  Chapter  3. 
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Figure  3 

Single-period  Network  Representation  of  System 
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Phase  I  Applications  of  HEC-PRM 


HEC-PRM  was  applied  by  HEC  staff  for  preliminary  analysis  of  the  Missouri  River  system  in 
Phase  I  of  this  study.  These  results  were  presented  in  an  earlier  report  (USACE,  1991b)  and  are 
summarized  here  for  completeness. 

Validation  of  Model.  Unlike  a  descriptive  model,  HEC-PRM  cannot  be  validated  directly  by 
comparison  with  historical  data.  No  such  data  can  exist  because  the  objective  function  used  in  the 
model  never  reflects  exactly  all  goals  of  and  constraints  on  operation.  Consequently,  historical 
operation  never  is  truly  optimal  for  the  objective  function  used  in  the  model.  However,  HEC  staff  felt 
that  properly-defined,  current-condition,  aggregate  penalty  functions  would  correlate  highly  with 
current  operation  rules  because  those  functions  have  developed  around  expected  operation.  For 
example,  marina  owners  build  boat  docks  where  they  expect  the  lake  level  to  be.  They  would  incur 
no  cost  if  the  reservoir  is  operated  to  hold  the  lake  at  that  level.  Their  penalty  function  would  reflect 
this.  The  marina  owner’s  desired  level,  over  time,  becomes  the  level  corresponding  to  operation  with 
the  current  policy.  Similar  arguments  can  be  made  for  facilities  to  withdraw  irrigation  water  from 
reservoirs,  and  for  works  to  divert  water  for  supply  in  downstream  reaches.  Thus  operation  to 
minimize  the  penalty  should  reflect,  to  a  large  degree,  current  operation  rules.  This  argument  led  to 
expecting  the  operation  proposed  by  the  model  with  current-condition  penalty  functions  to  compare 
favorably  with  current  operation.  A  test  was  thus  devised. 

For  the  test,  Missouri  River  system  operation  for  March  1965  to  March  1970  was  analyzed  with 
HEC-PRM.  Best  estimates  of  current-condition  penalty  functions  were  used.  The  resulting  network 
included  5327  arcs  and  1142  nodes.  The  results  were  compared  with  operation  following  current 
rules,  determined  with  L01.  A  perfect  match  of  operation  was  not  expected.  Indeed,  the  results 
should  not  be  identical,  as  the  models  employ  different  simplifications  of  the  real  system,  and  the 
descriptive  model  does  not  have  the  foresight  of  the  prescriptive  model.  Computed  reservoir  storages 
for  Ft.  Peck,  Garrison,  Oahe,  and  Ft.  Randall  for  the  validation  period  are  shown  in  Figure  4  through 
Figure  8.  For  simplicity,  storage  is  shown  in  thousand  acre-feet  (K/.  F).  The  pattern  of  storage 
indicated  by  the  two  models  for  Ft.  Peck  (Figure  4)  matches  well.  The  seasonal  cycles  are  identical. 
HEC-PRM  proposes  slightly  less  storage  for  1967-1969.  Some  slight  differences  in  the  storages  are 
attributable  to  the  approximation  of  the  evaporation.  At  lower  storages,  the  evaporation  is  over¬ 
estimated.  This  is  true  for  all  reservoirs.  The  general  pattern  of  storage  for  Garrison,  shown  by 
Figure  5,  also  matches  well.  The  storage  indicated  by  HEC-PRM  from  mid- 1966  to  early  1968  is 
about  20%  less  than  that  indicated  by  the  MRD  model.  In  that  same  period,  HEC-PRM  has  proposed 
greater  release  due  to  the  energy  penalty  function:  The  advantage  of  releasing  water  for  energy 
exceeds  the  advantage  of  storing  it  in  these  months,  even  for  future  use.  Thus  HEC-PRM  draws  down 
the  reservoir.  The  overall  Oahe  storage  pattern,  shown  in  Figure  6,  follows  the  pattern  of  the  MRD 
model.  Figure  7  shows  storages  at  Ft.  Randall  proposed  by  the  two  models.  These  match  well,  with 
what  appears  to  be  a  slight  time  lag  in  the  HEC-PRM  results.  This  time  lag  is  the  result  of  the 
capability  of  HEC-PRM  to  incorporate  knowledge  of  future  inflows  in  making  release  decisions:  If 
postponing  releases  will  reduce  the  overall  penalty,  HEC-PRM  will  do  so.  Figure  8  shows  the  total 
storage  in  the  mainstem  reservoirs  which  consists  of  Ft.  Peck,  Garrison,  Oahe,  Big  Bend,  Ft.  Randall, 
and  Gavins  Point. 

As  a  consequence  of  this  validation  study,  HEC  and  MRD  staff  accepted  HEC-PRM  as  a  tool  for 
analysis  of  the  Missouri  system. 
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Figure  4 

Ft.  Peck  Storages  Prescribed  in  Validation  Test 
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MRD  Results  HEC-PRM  Results 
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Figure  6 

Oahc  Storages  Prescribed  in  Validation  Test 
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MRD  Results  HEC-RPM  Results 
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Figure  7 

Ft.  Randall  Storages  Prescribed  in  Validation  Test 
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MRD  Results  HEC-RPM  Results 


Total  Mainstem  Reservoir  Storage  (6  Reservoirs) 

Validation  Period 


MRD  Results  HEC-RPM  Results 


Phase  I  Applications.  Phase  I  applications  of  HEC-PRM  included  the  following: 


(1)  analysis  of  the  system  critical  period,  March  1930  -  March  1953,  with  the  best-currently- 
available  estimates  of  system  penalty  functions;  and 

(2)  analysis  of  the  same  period  with  a  hypothetical  navigation  penalty  function. 

Chapter  3  of  this  report  describes  further  applications  of  the  model. 

Critical  Period  with  Best  Currently-Avaliable  Penalty  Functions.  The  network  required 
to  represent  system  operation  for  this  critical  period  included  23375  arcs  and  4970  nodes.  Figure  9 
through  Figure  13  show  the  HEC-PRM  proposed  end-of-month  storages  at  Ft.  Peck,  Garrison,  Oahe, 
and  Ft.  Randall  for  the  critical  period.  As  a  rule,  energy  generation  dominates  the  operation.  HEC- 
PRM  proposes  release  of  water  to  drive  the  energy  penalty  to  zero  if  sufficient  water  is  available. 
Otherwise,  it  proposes  making  no  release  and  storing  water  for  subsequent  use.  This  is  a  case  of 
farsighted  versus  shortsighted  decision  making.  The  model  must  choose  between  making  minimum 
releases  for  hydropower  now  or  storing  water  for  later  use.  It  choses  the  latter  based  on  system 
penalty  for  the  total  period  of  analysis,  as  defined  by  the  penalty  functions.  Although  a  skilled 
operator  might  choose  a  smoother  operation  scheme,  the  penalty  functions  used  in  this  application  do 
not  indicate  that  another  policy  is  better,  although  it  may  be  as  good. 

Figure  14  shows  channel  flows  at  Sioux  City  and  Kansas  City  if  the  system  is  operated  according 
to  the  policy  found  by  HEC-PRM.  At  Sioux  City,  the  penalty  would  be  great  if  the  flow  is  less  than 
approximately  500  KAF/month  (8,260  cfs)  in  January  or  less  than  1600  KAF/month  (26,400  cfs)  in 
the  remainder  of  the  year.  HEC-PRM  has  proposed  releases  that  will  meet  this  minimum.  At  Kansas 
City,  the  penalty  would  be  great  if  the  flow  is  less  than  500  KAF/month  (8,260  cfs)  in  January  or 
2200  KAF/month  (36,400  cfs)  in  the  remainder  of  the  year.  Again,  HEC-PRM  has  proposed  releases 
to  meet  this  minimum.  Similarly,  HEC-PRM  has  proposed  releases  that  will  limit  the  channel  flow  at 
Sioux  City  to  well  below  the  discharge  at  which  penalty  again  is  great.  This  is  2500  KAF/month 
(41,300  cfs)  in  January  or  8000  KAF/month  (132,000  cfs)  in  the  remainder  of  the  year.  In  fact,  most 
flows  are  in  the  range  between  the  desired  minimum  and  the  desired  maximum,  thereby  incurring  little 
or  no  penalty.  The  same  is  true  at  Kansas  City.  The  flow  is  frequently  in  the  range  500  or  2200 
KAF/month  (8,260  or  36,400  cfs)  to  3600  KAF/month  (59.500  cfs).  The  flow  at  Kansas  City  is 
clearly  outside  this  range  in  1947  and  again  in  1951.  However,  reservoir  operation  could  do  little  to 
reduce  these  extreme  flows,  as  they  are  the  consequence  of  uncontrollable  local  inflow.  For  example, 
when  the  flow  at  Kansas  City  reaches  approximately  10000  KAF/month  (174,000  cfs)  in  1951,  the 
local  inflow  between  Nebraska  City  and  Kansas  City  is  almost  9000  KAF/month  (149,000  cfs). 

Critical  Period  with  Hypothetical  Navigation  Penalty  Function  for  Sioux  City  Flow. 

In  the  second  Phase  I  application  of  HEC-PRM,  a  hypothetical  navigation  penalty  function  was  added 
at  Sioux  City  to  demonstrate  the  impact  of  system  operation  for  high-penalty  downstream 
requirements.  This  function  increased  by  approximately  an  order  of  magnitude  the  unit  penalty  for 
flow  outside  the  range  desired  for  navigation  (1875  -  7200  KAF/month  or  31,000  -  119,000  cfs  during 
the  months  April  to  November).  Figure  15  through  Figure  19  show  the  prescribed  storages  for  Ft. 
Peck,  Garrison,  Oahe.  Ft.  Randall,  and  total  mainstem  storage  for  the  critical  period  using  this 
hypothetical  navigation  penalty  function. 

The  hypothetical  navigation  penalty  function  causes  the  How  pattern  at  Sioux  City  to  be 
smoother,  as  the  range  of  flows  there  is  reduced.  Figure  20  shows  the  downstream  flows  at  Sioux 
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Fori  Peck  Prescribed  Storages  for  Critical  Period  with  Best  Estimate  Penalty  Function 
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HEC-PRM  using  best  estimate  of  penalty  functions 


HEC-PRM  using  boat  estimate  of  penalty  functions 


Oahe  Reservoir 
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IEC-PRM  using  best  estimate  of  penalty  functions 


Figure  12 


Fl.  Randall  Prescribed  Storages  for  Critical  Period  with  Best  Estimate  Penalty  Functions 
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IEC-PRM  using  bast  astlmata  of  penalty  functions 


Total  Mainstem  Reservoir  Storage  (6  Reservoirs) 
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Figure  13 


Total  Peck  Storages  Prescribed  for  Critical  Period  with  Best  Estimate  of  Penalty  Function 
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penalty  functions 


Channel  Flows 
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Fort  Peck  Reservoir 
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Figure  15 

Ft.  Peck  Prescribed  Slorages  for  Crilical  Period  with  Hypothetical  Navigation  Penalty  Function 
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using  hypothetical  navigation  functions  at  Sioux  City 


Figure  16 

Garrison  Prescribed  Storages  for  Critical  Period  with  Hypothetical  Navigation  Penalty  Function 
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HEC-PRM  using  hypothetical  navigation  (unctions  at  Sioux  City 
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Figure  17 

Oahc  Prescribed  Storages  for  Critical  Period  with  Hypothetical  Navigation  Penalty  Function 
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using  hypothetical  navigation  functions 


Figure  18 

Ft.  Randall  Prescribed  Storages  for  Critical  Period  with  Hypothetical  Navigation  Penalty  Function 
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Total  Mainstem  Reservoir  Storage  (6  Reservoirs) 
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Figure  19 


Total  Prescribed  Storages  for  Critical  Period  with  Hypothetical  Navigation  Penalty  Function 
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HEC-PRM  uilnfl  hypothetical  navigation  tunetlofta  at  Sloox  City 
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Figure  20 

Sioux  City  and  Kansas  City  Flows  for  Critical  Period  with  Hypothetical  Navigation  Penally  Function 


HEC-PRM  using  hypothetical  navigation  functions  at  Sioux  City 


City  and  Kansas  City  in  that  case.  Often  the  system  has  operated  to  provide  exactly 
1875  KAF/month(3 1,000  cfs)  during  April-November.  For  December-March,  the  system  has  reduced 
releases  to  a  bare  minimum  to  conserve  water  to  meet  subsequent  April-November  demands.  Even  so, 
to  satisfy  the  1875  KAF/month  (31,000  cfs)  minimum  at  Sioux  City,  the  system  must  draw  down  Ft. 
Peck,  Garrison,  and  Oahe,  starting  in  1939.  For  example,  the  January  1942  storage  at  Ft.  Peck  falls 
to  7000  KAF,  whereas  without  the  hypothetical  function,  it  was  approximately  15000  KAF.  Earlier 
and  later  in  the  critical  period,  the  Ft.  Peck  storages  are  approximately  the  same  with  and  without  the 
function.  Then  sufficient  water  is  available  to  meet  the  demand  without  drawing  on  upstream  storage. 
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Chapter  3 

Phase  II  Activities 


Summary  of  Activities  Proposed 

As  proposed  by  HEC,  Phase  II  of  the  Missouri  River  system  study  began  in  January  1991,  with 
the  following  goals: 

(1)  expand  the  system  analyzed; 

(2)  refine  the  penalty  functions  used; 

(3)  improve  HEC-PRM’s  user  interface; 

(4)  make  technical  improvements  to  HEC-PRM; 

(5)  complete  additional  Phase  II  analyses;  and 

(6)  transfer  developed  technology  to  MRD  staff. 

Each  of  these  proposals  is  summarized  herein,  and  the  progress  is  described. 


Model  Expansion 

Proposed  Expansion.  Phase  I  HEC-PRM  applications  included  all  six  main-stem  reservoirs, 
but  were  limited  to  non-reservoir  control  points  as  far  downstream  as  Hermann.  For  Phase  II  analyses, 
HEC  proposed  the  following  expansion: 

(1)  add  St.  Louis  as  a  node  to  enable  modeling  the  effects  of  the  Missouri  River  reservoir 
operation  on  navigation  of  the  Mississippi  River  between  St.  Louis  and  Cairo,  the  mouths  of 
the  Missouri  and  Ohio  Rivers,  respectively;  and 

(2)  expand  the  period  of  analysis  to  the  available  period  of  record. 

Accomplishments.  The  model  was  successfully  expanded  to  the  full  hydrologic  record: 
Hydrologic  data  files  were  completed  for  the  full  1898  to  1990  presently-available  record.  The 
software  permits  choosing  all  or  any  selected  time  window  for  analysis.  The  model  was  successfully 
extended  by  adding  a  control  point  for  St.  Louis  and  incorporating  local  flow  representing  the 
Mississippi  River  above  the  junction  with  the  Missouri  River.  A  penalty  function  representing 
downstream  Mississippi  River  navigation  impacts  was  applied  to  flows  in  the  St.  Louis-to-Cairo  reach 
for  April  through  November.  This  function  is  shown  as  Figure  21. 

Figure  22  shows  total  system  storage  prescribed  by  HEC-PRM.  with  and  without  the  St.  Louis 
penalty  function.  These  results  are  not  significantly  different.  This  indicates  that  optimal  operation  of 
the  system  for  all  other  purposes,  ignoring  navigation  at  St.  Louis,  morc-or-less  satisfies  requirements 
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Navigation  Penalty  Function  at  St.  Louis 

April  through  November 

Penalty  in  $1 ,000 


50,000  100,000  150,000 

Channel  Flow  in  cubic  feet  per  second 


Total  Mainstem  Reservoir  Storage  (6  Reservoirs) 

Critical  Period 

Reservoir  Storage  in  KAF 


Figure  22 

Total  Prescribed  Storage  for  Critical  Period  with  St.  Louis  Penalty  Function 
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Without  Penalty  With  Penalty 


for  navigation  flows  at  St.  Louis.  Of  course,  the  operation  for  individual  months  varies  depending  on 
inclusion  of  the  penalty  function.  However,  HEC-PRM  does  not  consider  operation  for  individual 
months  without  reference  to  the  long-term  impact.  This  is  illustrated  well  with  Figure  23,  flow- 
duration  functions  at  St.  Louis.  The  functions  are  essentially  the  same  with  and  without  the  navigation 
penalty. 

Penalty  Function  Refinement 

Refinement  Proposed.  The  penalty  functions  used  in  Phase  I  were  based  on  the  best 
currently  available  data.  For  Phase  A,  these  functions  were  to  be  refined,  and  functions  were  to  be 
added  to  permit  modeling  operation  for  all  purposes.  As  originally  proposed,  this  refinement  was  to 
be  undertaken  as  a  task  separate  from  model  development.  In  addition  to  function  refinement, 
representation  of  short-term  flood-control  operation  goals  and  objectives  in  the  monthly  analysis  with 
HEC-PRM  was  to  be  addressed. 

Accomplishments.  In  general,  refinement  of  the  penalty  functions  has  lagged  behind  model 
development.  Work  continues  by  IWR  and  MRD  staff.  The  penalty  functions  required  for  Phase  II 
analyses  are  to  be  available  in  early  1992.  As  a  consequence  of  the  delay,  final  analyses  were  not 
completed  as  of  the  publication  of  this  report.  This  is  discussed  further  subsequently. 

The  flood-control  issue  was  addressed.  In  Phase  I,  no  penalty  was  associated  with  storing  water 
in  the  flood-control  pools  of  the  system  reservoirs.  Instead,  HEC-PRM  was  constrained  to  prevent  use 
of  the  exclusive  flood-control  pool.  HEC  explored  the  following  alternatives  for  analysis  with  HEC- 
PRM: 

(1)  develop  penalty  functions  to  discourage  storage  in  the  flood-control  zone; 

(2)  continue  to  exclude  storage  from  the  zone;  or 

(3)  analyze  system  operation  with  and  without  storage  permitted  in  the  zone. 

Each  alternative  is  described  in  Appendix  A.  After  considering  the  pros  and  cons  of  each,  HEC  staff 
decided  to  continue  analysis  as  performed  in  Phase  I.  If  HEC-PRM  fails  to  find  a  solution  as  a 
consequence  of  these  constraints,  the  constraints  can  be  relaxed,  and  the  model  re-run. 


User  Interface  Improvement 

Proposed  Improvements.  Identified  targets  for  improvements  to  the  HEC-PRM  user 
interface  for  Phase  II  were: 

(1)  automate  penalty-function  derivation; 

(2)  improve  presentation  of  results;  and 

(3)  implement  a  viable  user  interface  for  the  Phase  II  analyses  commensurate  with  the  time  and 
resources  available. 

Accomplishments.  A  character-based  interface  was  selected  and  implemented.  This  interlace, 
designated  MENUPRM,  is  a  shell  similar  to  that  employed  by  HEC  lor  its  other  PC-based  programs 


Duration  at  St.  Louis 


Percent  of  Values  Exceedance 


MENUPRM  provides  the  user  easy,  consistent  access  to  HEC-PRM  and  the  support  programs  required. 
With  MENUPRM,  the  program  user  can  accomplish  the  following: 

(1)  Assign  a  subdirectory  for  each  study; 

(2)  Select  a  study  and  move  to  the  associated  subdirectory; 

(3)  Select  the  desired  program  from  those  listed  and  described  in  Appendix  B; 

(4)  Identify  files  required  to  execute  the  selected  program  including  ASCII  input  and  output 

files,  ASCII  macro  and  function  files,  and  binary  files,  such  as  HEC-DSS  files; 

(5)  List  existing  files  associated  with  the  selected  program; 

(6)  Edit  files  using  the  COED  editor; 

(7)  Edit  files  using  the  alternate  editor,  "Blackbeard"  from  Lahey  Computer  Systems; 

(8)  Delete  a  file; 

(9)  Execute  the  selected  program; 

(10)  View  the  ASCII  output  from  the  selected  program  with  the  LIST  program; 

(11)  Print  the  files  with  the  DOS  PRINT  command;  and 

(12)  Automatically  post-process  results  from  HEC-PRM  with  programs  PRMPOST  and 

MATHPK. 

Appendix  I  describes  the  purpose  of  MENUPRM  and  displays  the  various  menus  which  are  accessible 
to  the  user.  It  also  describes  the  procedures  and  sequences  of  moving  through  the  menus  as  well  as 
the  required  key  combinations  for  performing  operations.  An  example  operation  is  to  execute  the 
selected  program  by  pressing  the  "Alt-X"  key  combination. 

Results  of  solution  of  the  network-flow  programming  representation  of  the  reservoir  operation 
problem  are  stored  by  HEC-PRM  with  the  HEC-DSS.  To  display  the  results  in  a  meaningful, 
consistent  manner,  HEC  staff  selected  a  set  of  standard  operation  reports  and  developed  macros  to 
produce  these  with  program  MATHPK  (USACE,  1991e).  MATHPK  is  accessible  from  the  user 
interface.  Appendix  C  describes  the  macros. 

HEC-PRM  requires  the  user  to  specify  a  single  convex  and  piecewise-linear  penalty  function  for 
each  system  link.  To  develop  this  function,  the  user  must  pre-process  penalty  functions  developed  for 
various  project  purposes.  For  the  Phase  I  applications,  this  pre-processing  was  done  using  Lotus  123, 
DSPLAY,  and  a  number  of  manual  steps.  This  process  was  improved  substantially  with  better 
interface  between  the  Lotus  123  steps  and  HEC-DSS  file  entry.  However,  further  improvements  are 
desirable. 

In  addition  to  the  planned  activities,  modifications  were  made  to  MATHPK  and  program 
PRMPOST  was  written  to  process  model  results.  These  modifications  and  additional  programming 
permit  convenient  period -by -period  comparision  of  HEC-PRM  and  L01  results. 
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Technical  Improvements  to  HEC-PRM 


Proposed  Improvements.  HEC  proposed  the  following  technical  improvements  to  HEC-PRM 
for  Phase  n  studies: 

(1)  the  execution  time  required  would  be  reduced,  if  feasible;  and 

(2)  an  improved  algorithm  would  be  implemented  for  computation  of  hydropower  penalty. 

Accomplishments.  Significant  progress  has  been  made  towards  reducing  execution  time.  In 
addition  to  various  alternatives  proposed  in  the  Phase  I  report,  HEC  contacted  and  subsequently 
contracted  with  Prof.  Paul  Jensen  of  The  University  of  Texas  at  Austin  to  improve  the  generalized 
network  solver  used  in  HEC-PRM.  Jensen  provided  an  updated  FORTRAN-callable  solver  in  May 
1991  and  reported  solution  times  that  were  20-50%  of  those  required  by  the  solver  originally 
employed  (Jensen,  1991a).  Subsequently,  Jensen  further  modified  the  solver  to  permit  rapid  re¬ 
optimization  after  changes  in  the  model  (Jensen,  1991b).  This  modification  will  be  particularly  useful 
in  iteration  for  estimation  of  hydropower  penalty.  Unfortunately,  the  structure  of  the  updated  solver  is 
significantly  different  from  the  original  solver,  so  it  has  not  yet  been  incorporated  fully  in  HEC-PRM. 
However,  for  interim  applications,  software  was  developed  to  use  this  solver  and  alternative  solvers 
with  data  transfer  via  files.  With  this  approach,  the  network  description  is  written  to  a  file.  The 
solver  reads  the  file,  determines  the  optimal  flows,  and  writes  the  solution  to  a  file.  This  solution  file 
is  read  and  processed,  and  the  results  are  stored  with  HEC-DSS  for  display  and  further  analysis. 

For  all  applications  in  the  Phase  I  study,  hydropower  penalty  functions  were  simplified  to  express 
the  penalty  as  a  function  of  reservoir  release  only.  For  Phase  II,  a  hydropower  algorithm  was 
developed  to  overcome  this  deficiency.  This  algorithm  is  a  successive  linear  programming  solution, 
based  on  those  proposed  in  the  following  references: 

Grygier,  J.C.,  and  Stedinger,  J.R.  (1985).  "Algorithms  for  optimizing  hydropower  system 
operation."  Water  Resources  Research  21(1),  1-10. 

Martin,  Q.W.  (1982).  "Multireservoir  simulation  and  optimization  model  SIM-V,"  UM-38,  Texas 
Department  of  Water  Resources,  Austin,  TX. 

Reznicek,  K.K.,  and  Simonovic,  S.P.  (1990).  "An  improved  algorithm  for  hydropower 
optimization."  Water  Resources  Research  26(2),  189-198. 

The  algorithm  is  presented  in  detail  in  Appendix  D.  In  summary,  the  approach  is  to  estimate  storage 
(head)  for  each  reservoir,  solve  the  resulting  linear  problem  in  terms  of  release,  re-compute  storage 
given  the  optimal  release,  and  re-iterate  if  the  difference  between  estimated  and  computed  storage 
exceedes  a  tolerance.  Initial  tests  of  the  algorithm  were  made.  Final  coding  of  the  algorithm  and 
testing  is  not  yet  complete,  peni  ig  incorporation  of  the  improved  network  solver. 


Phase  II  Analysis 


Analyses  Proposed.  For  Phase  II,  HEC  proposed  to  perform  three  or  four  analyses  of  system 
operation,  in  anticipation  that  MRD  staff  would  request  these  for  their  studies.  HEC  staff  expected 
that  these  analyses  would  represent  differing  views  regarding  system  operation  that  would  surface 
during  model  development.  HEC  planned  that  these  analyses  would  use  complete,  Finalized  penalty 
functions  with  a  final.  Phase  II  version  of  HEC-PRM. 

Analyses  Completed.  An  MRD  request  was  not  received,  and  the  proposed  modeling  was  not 
performed.  The  delay  occurred  because  of  unanticipated  delays  in  development  of  complete  penalty 
functions 


Technology  Transfer 

Proposed  Transfer  Activities.  HEC  proposed  the  following:  (1)  prepare  a  draft  user’s 
manual;  and  (2)  conduct  a  workshop  on  model  application  for  MRD  staff. 

Accomplishments.  A  successful  workshop  was  conducted  in  Davis,  CA,  on  2-4  December 
1991  for  MRD  staff.  The  agenda  for  that  course  is  included  as  Appendix  E.  Additional  workshop 
materials  not  included  in  this  report  are  published  under  separate  cover. 

The  following  additional  documents  were  prepared  to  provide  MRD  staff  with  guidance  in  use  of 
HEC-PRM  and  are  included  as  Appendices  to  this  report: 

(1)  HEC-PRM  Pathname  Parts,  MRD  Application.  (Appendix  G) 

(2)  HEC-PRM  Program  Description.  (Appendix  F ) 

(3)  HEC-PRM  Supplemental  Programs.  (Appendix  H) 

In  addition  to  these  manuals,  two  internal  reports  were  prepared  to  documen.  improvements  and 
modifications  to  the  network  solver  (Jensen,  1991a, b).  Another  report  is  under  preparation  to  provide 
guidance  in  developing  operating  plans  from  HEC-PRM  results.  This  report  is  not  scheduled  for 
completion  until  after  publication  of  this  Phase  II  report.  Preliminary  proceedings  and  findings  of  this 
report  were  presented  in  the  December  2-4  workshop  and  are  summarized  in  the  next  chapter 
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Chapter  4 

Development  of  Operation  Plans  from  Analysis  Results 


As  an  extension  of  the  Phase  II  activities,  the  Hydrologic  Engineering  Center  is  reviewing 
alternatives  to  enable  recommendation  of  procedures  for  developing  system  operating  rules  from  HEC- 
PRM  results.  This  task  is  necessary  to  bridge  the  gap  between  theory  (the  prescriptive  model)  and 
practice  (the  real-world  system).  The  present  status  and  findings  of  this  activity  were  presented  in  the 
2-4  December  1991  workshop  and  will  be  discussed  in  a  future  technical  report  by  Prof.  Jay  Lund, 
contractor  to  the  HEC  (USACE,  1992).  These  are  summarized  briefly  herein. 


Some  Uses  of  Operations  Plans  with  HEC-PRM  Results 

There  are  two  potential  uses  of  operating  rules  developed  from  HEC-PRM  results  for  the 
updating  of  reservoir  control  manuals.  The  first  use  is  to  suggest  modifications  in  the  rules  currently 
used  to  operate  a  reservoir  system.  Here,  the  HEC-PRM  results  are  used  to  "re-calibrate"  existing 
operation  rules,  varying  parameters  such  as  minimum  pool  sizes,  the  rate  at  which  releases  increase 
with  storage,  etc.  The  second  potential  use  of  rules  developed  from  HEC-PRM  results  is  to  suggest 
new,  quantitatively  different  operating  rules  for  the  system.  This  second  use  can  be  used  to  suggest 
near-optimal  operating  procedures  that  may  be  very  different  from  the  approach  currently  used.  This 
provides  a  relatively  rigorously-derived  alternative  to  modifications  to  existing  operating  rules.  These 
alternatives  can  then  be  compared  on  the  basis  of  more  detailed  simulation  studies. 


Approaches  to  Developing  Operations  Plans  with  HEC-PRM  Results 

There  are  several  general  approaches  to  developing  operations  plans  from  optimization  model 
results.  These  include  intuitive  approaches,  use  of  statistical  regression,  the  use  of  balancing  rules 
from  reservoir  operations  theory,  and  mixed  simulation-optimization  approaches.  These  are 
summarized  in  Table  4. 

In  actual  practice,  a  combination  of  all  these  approaches,  in  some  mix,  has  typically  been  used  in 
the  literature.  In  any  approach  taken  to  develop  operation  plans  from  optimization  results,  the 
operation  plan  suggested  by  the  optimization  results  should  only  be  viewed  as  an  initial  suggestion  for 
the  reservoir  system’s  operations.  The  nature  of  optimization  modeling  typically  requires 
simplification  of  the  problem  to  a  significant  degree  beyond  the  simplifications  made  in  most  system 
simulation  models.  Therefore,  any  optimization-derived  operation  plan  should  be  considered  subject  to 
further  refinement  and  testing  with  the  aid  of  simulation  models.  In  this  way,  the  operation  plan  from 
the  optimization  results  is  mainly  a  "point  of  departure". 


Approach  Taken  for  MRD  Application 

The  HEC-PRM  results  used  in  developing  preliminary  operation  rules  utilized  the  full  92-year 
hydrologic  record  for  the  basin.  This  long  record  contained  several  major  drought  and  flood  events 
and  was  assumed  to  be  representative  of  the  range  and  frequency  of  conditions  that  will  be 
experienced  in  (he  future. 
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Table  4 

Alternative  Approaches  for  Developing  Operation  Rules  from  HEC-PRM  Results 


Approach 

Intuitive 


Regression 


Balancing  rules 


Mixed  simulation 


Description 

This  approach  relieves  on  the  analyst’s  subjective  review  of  HEC-PRM  results  to 
identify  patterns  in  operation.  For  example,  if  HEC-PRM  consistently  prescribes 
seasonal  drawdown  of  a  given  reservoir,  the  analyst  could  infer  that  a  good 
operating  rule  for  that  reservoir  would  include  such  seasonal  drawdown. 

This  approach  was  formally  proposed  by  G.K.  Young  in  1 966  in  his  paper  "Finding 
reservoir  operating  rules’.  The  approach  relies  on  statistical  analysis  to  identify 
any  correlation  between  the  optimal  releases,  as  defined  by  a  prescriptive  model, 
and  system  inputs  and  state  variables.  For  example,  a  regression  equation  might 
be  developed  to  define  the  optimal  monthly  reservoir  release  as  a  function  of 
beginning-of-month  storage  and  predicted  monthly  inflow. 

This  approach  seeks  to  identify  patterns  in  the  prescriptive-model  results  that  are 
consistent  with  theoretical  operation  rules.  These  theoretical  rules  include,  for 
example,  the  space  rule,  the  pack  rule,  and  the  hedging  rule  described  by  Maas,  et 
al.(  1962). 

Although  identified  as  a  separate  optimization  approach,  Lund  characterizes  this  as 
a  critical  component  of  all  approaches.  He  proposes  that  any  operating  rules  or 
patterns  identified  be  tested  with  detailed  simulation  model.  This  will  permit  more 
detailed  review  of  both  the  prescriptive  model  results  and  the  derived  operation 
rules. 


In  analyzing  the  record,  an  "informal,  yet  systematic"  strategy  is  used  to  infer  new  operating  rules 
from  "optimal"  HEC-PRM  results.  This  strategy  incorporates  some  elements  of  all  the  approaches 
mentioned  above  and  employed  a  statistical  package  to  quickly  display  and  process  results  data.  First, 
the  HEC-PRM  results  were  reviewed  graphically  with  time  series  plots  and  histograms  and  with  the 
use  of  descriptive  statistics,  mean  monthly  storages,  minimum  storages,  mean  releases,  etc.  This 
identified  consistent  and  dominant  trends  in  the  HEC-PRM  results.  This  first  pass  was  able  to  identify 
near  optimal  storage  levels  for  each  of  the  lower  three  reservoirs  for  each  month  and  identified 
minimum  storages  in  all  of  the  system’s  reservoirs.  These  results  were  very  consistent  across  the  92- 
year  record.  This  first  pass  fixed  the  annual  and  over-year  operating  behavior  of  the  three  lower 
reservoirs. 

A  second  pass  was  then  made  to  examine  specifically  the  operation  of  the  upper  three  reservoirs. 
While  distinct  minimum  storages  were  evidenced  for  each  of  these  three  reservoirs,  no  simple  pattern 
of  storage  or  release  targets  was  evidenced  in  the  first  pass  through  the  results.  The  second  pass 
consisted  of  the  use  of  several  trial  regression  equations  to  explain  the  behavior  of  the  storages  and 
releases  from  these  reservoirs.  These  regressions  proved  largely  ineffective.  A  second,  simpler 
approach  was  then  taken,  plotting  the  storage  in  each  reservoir  against  total  system  storage.  This 
yielded  rather  consistent  patterns  of  storage  allocation  between  the  three  reservoirs  as  shown  in 
Figure  24.  This  second  pass  then  produced  allocation  rules  for  total  storage  between  the  three  large 
upper  reservoirs. 

A  third  pass  was  then  made  to  estimate  monthly  release  rules  from  Gavins  Point,  based  on  total 
system  storage  and  inflows.  With  this  estimate,  total  storage  can  be  cumulatively  derived  and  the 
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July  Optimal  Storage  Relationships 


Figure  24 

July  Optima!  Storage  Relationships 
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Storage  (KAF) 


operation  of  the  entire  system  is  then  specified. 


Finally,  a  comparison  of  the  operations  suggested  by  HEC-PRM  and  the  current  operation  plan, 
represented  by  the  MRD  system  simulation  model,  was  made.  This  pointed  out  divergences  between 
HEC-PRM’ s  suggested  operations  and  current  operation  plans.  Had  this  been  an  actual  application  to 
actually  suggest  new  operation  plans,  a  series  of  follow-up  simulation  studies  would  be  required. 

The  process  of  finding  operating  rules  from  the  92-year  HEC-PRM  results  revealed  the  following 
causes  for  concern,  which  should  be  addressed  before  final  HEC-PRM  results  are  created: 

1 .  It  appears  that  the  preliminary  penalty  functions  for  flooding  in  the  winter  are  the  same  as 
those  for  summer  months.  This  neglects  the  important  role  of  ice  formation  on  winter 
flooding  discussed  in  the  current  water  control  manual.  The  absence  of  ice-related  flooding 
penalties  drastically  changes  the  within-year  operation  of  the  system,  retaining  within-year 
storage  much  later  in  the  winter.  The  penalty  functions  for  flooding  due  to  ice  formation 
are  currently  under  development  and  will  be  used  in  the  final  HEC-PRM  runs. 

2.  In  comparing  the  HEC-PRM  results  with  the  results  from  the  MRD  simulation  model,  it  is 
evident  that  the  same  hydrologic  input  was  not  used  as  input  to  the  two  models.  To  make 
accurate  comparisons,  the  proper  versions  of  depletions  and  models  must  be  used  so  that 
both  programs  are  analyzing  the  same  level  of  depletions  and  that  the  input  is  of  the  same 
version  as  that  of  the  model. 

Final  work  with  HEC-PRM  to  suggest  operation  plans  for  the  main  stem  system  cannot  be 
completed  until  final  penalty  functions  are  derived.  When  these  become  available,  the  final  92-year 
runs  could  be  made  and  interpreted  for  the  development  of  operation  plans.  From  the  interpretation  of 
the  initial  92-year  run,  it  appears  that  this  would  be  possible.  However,  if  one  were  to  develop  final 
operation  plans  from  HEC-PRM  results,  the  functions  would  have  to  be  refined  and  tested  by 
simulation. 
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Chapter  5 

Planned  Model  Improvements  and  Their  Impact  on  Future  Analysis 

In  calendar  year  1992,  HEC  staff  plan  improvements  to  HEC-PRM  for  other  on-going  studies. 
These  improvements  include,  but  are  not  limited  to,  the  following: 

(1)  further  refinement  of  the  user  interface; 

(2)  integration  and  testing  of  the  improved  network  solver;  and 

(3)  implementation  and  testing  of  the  hydropower  algorithm. 

The  goal  is  to  develop  a  general-purpose  model  and  software  that  can  be  applied  on  any  system.  The 
current  HEC  target  for  public  release  of  the  software  is  1  January  1993.  However,  as  HEC-PRM  is 
improved  in  the  interim,  updates  will  be  provided  to  MRD. 


User  Interface  Refinement 

The  user  interface  described  in  Chapter  3  is  viewed  as  an  evolving  product.  Changes  to  it  will 
make  HEC-PRM  easier  and  more  convenient  to  use  by  enhancing  input  data  preparation  and 
streamlining  the  review  of  results.  Additional  capabilities  anticipated  include  improvements  to  the 
method  of  defining  composite  penalty  functions.  These  improvements  will  permit  users  to  analyze 
operation  options  more  efficiently  in  response  to  proposals  by  those  affected  by  system  operation.  No 
major  change  in  the  overall  structure  of  the  analysis  package  (HEC-PRM  coupled  with  HEC-DSS)  is 
anticipated.  Consequently,  changes  to  the  user  interface  will  be  "upwardly  compatible,"  permitting 
continued  use  of  previously-developed  time  series  data,  penalty  functions,  and  HEC-DSS  input  data 
files. 


Improved  Network  Solver 

The  existing  HEC-PRM  network  solver  will  be  replaced  with  the  more-efficient  solver  provided 
by  Jensen  and  described  in  Chapter  3.  This  should  reduce  the  computation  time  required  for  analysis 
of  any  proposed  operation  goals  and  objectives.  To  incorporate  the  new  solver,  the  FORTRAN  code 
of  HEC-PRM  will  be  restructured  as  necessary.  This  restructuring  will  yield  code  that  is  oriented 
towards  the  new  solver’s  theoretical  methodology  (primal  simplex)  as  opposed  to  the  old  solver’s 
theoretical  methodology  (dual  flow  augmentation).  This  will  facilitate  the  efficient  replacement  of 
Jensen’s  solver  with  a  even  more  efficient  commercial  solver  of  the  same  theoretical  methodology  if  it 
is  deemed  necessary. 

In  addition  to  the  anticipated  reduction  in  execution  time  due  to  the  improved  solver,  a  reduction 
in  memory  requirement  is  anticipated.  As  described  in  earlier  documents  (US ACE,  1991b),  the  current 
version  of  HEC-PRM  represents  nonlinear  penalty  functions  with  a  piecewise  linear  approximation. 
Each  segment  of  the  approximation  requires  a  separate  arc  of  the  network.  The  improved  solver  uses 
a  new  data  structure  for  storing  models  with  piecewise  linear  arc  costs.  This  structure  requires  fewer 
arcs  to  represent  the  same  system.  This  reduction  in  memory  is  offset  by  the  new  solver’s  requirement 
of  double  precision  variables  for  some  solver  matrix  variables.  If  it  results  in  a  net  reduction  of 
memory  requirements,  this  would  enable  users  to  expand  the  system  analyzed,  include  more  control 
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points,  or  optimize  for  a  longer  period  of  time. 


Hydropower  Algorithm 

The  hydropower  algorithm  described  in  Chapter  3  will  be  implemented  and  tested,  following 
implementation  of  the  improved  solver.  This  algorithm  will  permit  more  accurate  analysis  of  system 
operation  for  energy  generation,  as  it  will  evaluate  properly  the  penalty  as  a  nonlinear  function  of 
storage  and  release.  In  the  case  of  the  Missouri  system,  this  will  yield  a  "fine  tuning"  of  simulation 
results. 


44 


References 


Chung,  F.I.,  Archer,  M.C.,  and  DeVries,  J.J.  (1989).  "Network  flow  algorithm  applied  to  California 
aqueduct  simulation,"  Journal  of  the  WRPMD,  ASCE,  115(2),  131-147. 

Ford,  L.R.,  and  Fulkerson,  D.R.  (1962).  Flow  in  Networks.  Princeton  University  Press,  Princeton,  NJ. 

Ford,  D.T.,  and  Davis,  D.W.,  (1989).  "Hardware-store  rules  for  system-analysis  applications,"  in 
Closing  the  Gap  Between  Theory  and  Practice ,  ed.  D.P.  Loucks,  Baltimore,  MD. 

Grygier,  J.C.,  and  Stedinger,  J.R.  (1985).  "Algorithms  for  optimizing  hydropower  system  operation." 
Water  Resources  Research  21(1),  1-10. 

Ikura,  Y.,  and  Gross,  G.  (1984).  "Efficient  large-scale  hydro  system  scheduling  with  forced  spill 
conditions,"  IEEE  Transactions  on  Power  Apparatus  and  Systems,  PAS-103(12),  3501-3520. 

Jensen,  P.A.,  Bhaumik,  G.,  and  Driscoll,  B.  (1974).  "Network  flow  modeling  of  multireservoir  water 
distribution  systems,”  CRWR-107,  University  of  Texas,  Austin,  TX. 

Jensen,  P.A.,  and  BamesJ.W.  (1980).  Network  Flow  Programming.  John  Wiley  and  Sons, 

Jensen,  P.A.,  (1991a).  "Development  of  a  minimum  cost  network-flow  solver,”  Report  to  the 
Hydrologic  Engineering  Center,  Davis,  CA. 

Jensen,  P.A.,  (1991b).  "Enhancements  to  the  minimum  cost  network-flow  solver,"  Report  to  the 
Hydrologic  Engineering  Center,  Davis,  CA. 

Liebman,  J.C.  (1976).  "Some  simple-minded  observations  on  the  role  of  optimization  in  public 
systems  decision  making,"  Interfaces,  TIMS,  6(4),  102-108. 

Maas,  A.,  et  al.  (1962).  Design  of  Water-resource  Systems.  Harvard  University  Press,  Cambridge, 
MA. 

Sabet,  M.H.,  Coe,  J.Q.,  Ramirez,  H.M.,  and  Ford,  D.T.  (1985).  "Optimal  operation  of  California 
aqueduct,"  Journal  of  the  WRPMD,  ASCE,  111(2),  222-237. 

Texas  Water  Development  Board  (1974).  "Analytical  techniques  for  planning  complex  water  resource 
systems,"  Report  183.  Austin,  TX. 

US  ACE  (1979).  Missouri  River  Main  Stem  Reservoir  System  Reservoir  Regulation  Manual:  Master 
Manual.  U.S.  Army  Engineer  Division,  Missouri  River,  Omaha,  NE. 

USACE  (1990a).  Plan  of  Study  for  the  Review  and  Update  of  the  Missouri  River  Main  Stem 

Reservoir  System  Reservoir  Regulation  Manual.  U.S.  Army  Engineer  Division,  Missouri  River, 
Omaha,  NE. 

USACE  (1990b).  Economic  Value  Functions  for  Missouri  River  System  Analysis  Model  -  Phase  /. 
Institute  for  Water  Resources,  Ft.  Belvoir.  VA. 


USACE  (1990c).  HEC-DSS  Users’s  Guide  and  Utility  Program  Manuals.  Hydrologic  Engineering 
Center,  Davis,  CA. 


USACE  (1991a).  HEC-PRM  Pathname  Parts,  MRD  Application.  Hydrologic  Engineering  Center, 
Davis,  CA. 

USACE  (1991b).  Missouri  River  System  Analysis  Model  -  Phase  /.  Hydrologic  Engineering  Center, 
Davis,  CA. 


USACE  (1991c).  HEC-PRM  Program  Description.  Hydrologic  Engineering  Center,  Davis,  CA. 

USACE  (1991d).  HEC-PRM  Supplemental  Programs.  Hydrologic  Engineering  Center,  Davis,  CA. 

USACE  (1991e).  MATHPK:  Mathematical  Manipulation  of  Data  Stored  in  a  DSS  Data  File,  Users 
Manual.  Hydrologic  Engineering  Center,  Davis,  CA. 

USACE  (1992).  Developing  Operation  Plans  from  HEC  Prescriptive  Reservoir  Model  Results  for  the 
Missouri  River  System:  Preliminary  Results.  Hydrologic  Engineering  Center,  Davis,  CA. 

USACE  (undated).  "EDP  program:  Missouri  river  main  stem  reservoirs  -  long  range  regulation 
studies,"  MRD-RCC  Technical  Report  FS1.  Omaha,  NE. 


Yeh,  W.  W-G.  (1985).  "Reservoir  management  and  operations  models:  A  state-of-the-art  review," 
Water  Resources  Research,  21(12),  1797-1818. 

Young,  G.K.  (1966).  "Finding  reservoir  operating  rules,”  Journal  of  the  Hydraulics  Division,  ASCE, 
93(HY6),  297-319. 


46 


Appendix  A 

Alternatives  for  Modeling  Flood-Control  Operation 
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Alternatives  for  Modeling  Flood-Control  Operation 


Penalty  Functions 

Description.  Penalty  functions  can  be  developed  to  discourage  use  of 
reservoir  flood-control  storage.  These  functions  would  represent  as  a  function 
of  beginning  of  month  storage,  for  example,  the  short-term  (within-month)  risk 
of  storing  rather  than  releasing  water.  These  penalties  can  be  compared  with 
penalties  of  releasing  water,  thus  evaluating  trade-offs  in  operation. 

Single  Reservoir  or  Independent  Operation.  For  a  single  reservoir  or 
for  a  system  in  which  reservoirs  are  operated  independently  for  flood  control,  a 
flood-control  storage  penalty  function  can  be  developed  as  follows: 

a.  Develop  a  set  of  hypothetical  inflow  hydrographs,  each  with 
specified  frequency.  These  hydrographs  represent  short-term  flood 
inflow.  Route  these  hydrographs  to  downstream  locations  to  define 
unregulated  frequency  curves.  Compute  the  damage  associated  with 
each  peak.  Define  a  damage-frequency  function.  Integrate  to 
compute  unregulated  expected  damage. 

b.  For  a  selected  beginning-of-month  (BOM)  state  of  flood-control 
storage  (for  example,  flood-control  pool  empty),  determine  the 
downstream  damage  with  each  hydrograph  if  the  reservoir  is 
operated  according  to  existing  rules.  Determine  the  corresponding 
damage.  Develop  a  damage-probability  function.  Compute 
expected  damage.  Compare  unregulated  and  regulated  damage  to 
compute  expected  benefit.  Assign  the  benefit  to  the  corresponding 
BOM  storage  state. 

c.  Repeat  step  b  for  other  selected  BOM  storage  states  to  develop  a 
complete  function. 

This  procedure  is  described  in  some  detail  in  the  following: 

Duren,  F.K.,  and  Beard,  L.R.  (1972).  "Optimizing  flood  control  allocation  for 
a  multipurpose  reservoir."  Water  Resources  Bulletin,  8(4),  735-744. 


Multiple  Reservoir  System.  Developing  flood-control  storage  functions  for 
a  multiple  reservoir  system  is  more  complex.  In  that  case,  the  damage 
prevented  by  one  reservoir  (and  hence,  the  value  of  empty  storage  in  that 
reservoir)  depends  on  the  available  storage  in  other  reservoirs  and  on  the 
inflows  to  those  reservoirs.  Such  nonseparable  functions  cannot  be  represented 
conveniently  with  a  linear  model  such  as  HEC-PRM.  Possible  remedies  to  this 
problem  include  the  following: 
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a.  Assume  all  reservoirs  in  same  condition  of  storage  (ie.,  if  one 
reservoir  flood-control  pool  is  empty,  all  flood-control  pools  are 
empty).  Assume  probability  of  inflows  same  at  all  sites  (ie.,  all 
reservoirs  have  n-year  flood  inflow  simultaneously).  Perform 
computations  as  above. 

b.  Assume  state  of  storage  and  system  inflows  are  independent.  Select 
a  BOM  storage  state  for  one  reservoir.  Generate  a  large  set  of 
random  inflows  for  system  reservoirs,  with  all  other  reservoir  BOM 
storage  states  selected  randomly.  Evaluate  average  damage 
prevented  and  assign  to  the  selected  BOM  storage  state  of  the 
reservoir  in  question.  Repeat  for  other  BOM  storage  states.  Then 
repeat  for  all  other  reservoirs. 

Pros  and  Cons.  This  alternative  makes  a  legitimate  attempt  to  value  storage 
for  trade-off  analysis.  Unfortunately,  the  methods  are  not  well  documented  or 
understood.  Development  of  the  functions  as  proposed  herein  is 
computationally  intensive. 


Exclude  Storage 

Description.  In  phase  I  of  the  Missouri  River  system,  HEC  included  flow- 
related  penalty  functions  to  represent  damage  at  downstream  control  points. 
After  early  runs  revealed  that  the  model  called  for  storing  significant  volumes 
in  the  exclusive  flood-control  pool,  HEC  added  inviolable  constraints  to 
prohibit  use  of  that  storage.  In  that  case,  HEC-PRM  prescribes  only  flows  and 
storages  that  do  not  require  use  of  the  flood-control  space.  If  HEC-PRM  could 
not  allocate  water  in  some  fashion  that  did  not  require  use  of  the  excluded 
storage,  it  would  declare  that  no  solution  exists. 

Pros  and  Cons.  This  alternative  is  simple.  However,  it  makes  no  attempt 
to  value  storage  for  trade-off  analysis.  Adding  constraints  to  HEC-PRM 
assumes  that  the  existing  allocation  of  storage  is  inviolable.  If  the  flood- 
control  space  is  required  to  manage  a  large,  long  duration  flood,  no  feasible 
solution  will  be  possible. 


Analysis  With  and  Without  Storage  Permitted 


Description.  With  and  without  analysis  with  HEC-PRM  permits  the  analyst 
to  impute  the  value  of  various  operation  constraints.  For  example,  the  analyst 
could  add  constraints  to  prohibit  use  of  flood-control  space  in  Ft.  Peck  and  re¬ 
analyze  system  operation.  The  analyst  could  then  eliminate  the  constraint  and 
re-analyze  operation.  The  difference  in  system  penalty  is  the  value  of 
permitting  use  of  the  flood-control  space.  Many  variations  on  this  theme  arc 
possible,  including  use  of  a  portion  of  the  space,  use  of  space  in  various 
combinations  of  reservoirs,  use  in  some  months  only,  etc. 
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Pros  and  Cons.  This  alternative  also  is  simple  to  use.  It  does  make  a 
legitimate  attempt  to  value  storage  for  trade-off  analysis.  However,  it  has  the 
same  problems  as  excluding  storage  if  storage  is  required. 
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Appendix  B 

Computer  Programs  Accessable  from  MENUPRM 
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Computer  Programs  Accessable  from  MENUPRM 


Program 

HEC-PRM 

PRMPOST 

DSSUTL 

DSPLAY 

MATHPK 

DSSPD 

RDMATF 

RDATAO 

DSSTXT 

DSSTS 

L01 

VI 

COED 


Description 

This  is  the  prescriptive  model.  This  program  formulates  and  solves  the 
network-flow  programming  problem  that  represents  the  reservoir  operation 
problem.  The  network-flow  solver  is  integrated  into  this  program. 

This  program  post-processes  the  HEC-PRM  results,  yielding  a  table  similar  in 
format  to  the  output  of  L01. 

This  is  the  HEC-DSS  housekeeping  program.  It  permits  the  user  to  tabulate, 
edit,  copy,  rename,  and  delete  data  stored  with  the  HEC-DSS.  It  also  converts 
data  to  and  from  ASCII  format  from  HEC-DSS  format. 

This  is  the  graphing  program  for  data  stored  with  the  HEC-DSS.  It  will  graph 
both  time  series  and  pair-function  data. 

This  program  is  the  equivalent  of  a  spreadsheet  for  data  stored  with  the  HEC- 
DSS.  It  provides  extensive  capabilities  to  perform  computations  with  stored 
data. 

This  program  l.Iows  the  user  to  store  paired-function  data  with  the  HEC-DSS. 
It  may  be  used  to  enter  penalty  functions  directly  for  analysis  with  HEC-PRM. 

This  program  reads  the  output  file  created  by  MRD’s  post-processor,  VI. EXE, 
and  stores  the  results  in  an  HEC-DSS  file. 

This  program  read’s  MRD’s  file  DATAO  and  stores  the  data  in  an  HEC-DSS 
file. 

With  this  program,  the  user  can  store  or  retrieve  text  from  an  HEC-DSS  file. 

With  this  program,  the  user  can  enter  regular-interval  time  series  into  a  HEC- 
DSS  file  from  keyboard  or  a  file. 

This  is  MRD’s  long-range-study  model.  It  simulates  operation  of  the  six 
major  reservoirs  of  the  Missouri  system  for  six  downstream  control  points  for 
15  periods  per  year. 

This  is  the  post-processor  for  L01.  It  provides  the  user  with  a  menu  of  system 
variables  computed  for  various  locations.  The  user  can  tabulate  or  plot  these 
values. 

This  is  the  Corps  editor.  It  permits  the  user  to  modify  any  text  file.  It  is  used 
to  prepare  and/or  edit  the  HEC-PRM  input  file.  Through  file  conversions,  it 
also  may  to  used  to  edit  data  stored  with  HEC-DSS. 
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Appendix  C 

MATHPK  Macros  for  HEC-PRM 
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MATHPK  Macros  for  HEC-PRM 


Listing  of  Macros 

Description  of  MATHPK  Macros  .  C  -  60 

DO_PRM .  C  -  63 

DO_PRM_M .  C  -  64 

DO_PRMl  .  C  -  64 

DO_MRD .  C  -  64 

OPEN1 .  C  -  65 

OPEN  .  C  -  65 

GET_TS .  C  -  65 

MONVARY .  C  -  66 

MONVARY1  .  C  -  66 

MONSAME  .  C  -  66 

CLASSDEF  .  C  -  67 

COUNTLO .  C  -  67 

RES_STAT .  C  -  68 

CP_STAT .  C  -  68 

STAT1 .  C  -  69 

DO_RES  .  C  -  70 

DO_RESl .  C  -  70 

DO_RES2 .  C  -  71 

DO_RES3 .  C  -  72 

DO_CP  .  C  -  73 

DO_CPl .  C  -  73 

DO_CP2 .  C  -  73 

DO_CP3 .  C  -  74 

SYSTEM  .  C  -  75 

RES_DUR  .  C  -  76 

CP_DUR  .  C  -  76 

DURATION .  C  -  77 

POWER .  C  -  78 

POWER_P .  C  -  78 

POWER  i  .  C  -  79 

POWER  1_P  .  C  -  79 

FLOW  LOC .  C  -  80 

Q_LOC  1 .  C  -  80 
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Description  of  MATHPK  Macros 


DO_PRM 


DO_PRM_M 

DO_PRMl 

DO_MRD 

OPEN1 

OPEN 


GET.TS 

MON VARY 

MONVARY1 

MONSAME 

CLASSDEF 

C’OUNTLO 


Master  macro  to  process  all  reservoirs  and  control  points.  If  reservoirs 
are  added  or  removed,  this  macro  must  be  modified.  There  is  one  line 
for  every  control  point  and  3  lines  for  every  reservoir.  The  reservoir 
lines  are  (1)  for  most  information  including  elevation,  flow  in  both 
units,  time  series  penalties,  etc.,  (2)  for  hydropower  energy,  and  (3}  for 
hydropower  capacity. 

Macro  similiar  to  DO_PRM.  This  acts  as  a  backup. 

Macro  similar  to  DO_PRM  except  this  is  for  a  test  case  of  one 
reservoir  and  one  control  point. 

Simpler  form  of  DO_PRM  for  only  some  information. 

Opens  all  DSS  data  files.  It  assumes  that  MRD.DSS  is  the  time  series 
file  and  PENCMP.DSS  is  the  penalty  function  file.  It  calls  the  more 
complex  macro  OPEN. 

Opens  all  DSS  data  files,  sets  the  time  window,  sets  the  interpolation 
parameter  to  no  extrapolation,  sets  the  number  of  lines  of  printout  to 
46,  initializes  the  tabulation  file  so  that  all  tabulations  will  start  at  the 
beginning  of  the  file,  gets  certain  parameters  like  the  month  number, 
the  factor  to  convert  cfs  to  KAF,  and  sets  the  printout  format  for  the 
month  number. 

Allows  a  simple  retrieval  of  time  series  data  and  the  conversion  from 
KAF  to  cfs. 

Calculates  time  series  penalties  for  a  parameter  when  the  penalty 
functions  for  all  months  are  stored  in  one  record  (pathname).  The 
penalty  function  record  contains  12  curves,  one  for  each  month. 

Calculates  time  series  penalties  for  a  parameter  when  the  penalty 
function  for  each  month  is  stored  in  a  separate  record  (pathname).  To 
compute  penalties  for  all  12  months  of  the  year,  12  separate  functions 
must  be  retrieved. 

Calculates  time  series  penalties  for  a  parameter  when  there  is  only  one 
penalty  function  and  it  applies  to  all  months  of  the  year. 

Computes  class  intervals  for  the  user  given  a  starting  value,  ending 
value,  and  an  interval.  The  user  must  set  the  pathname  parts  and  units 
and  then  store  the  class  intervals  in  the  DSS  data  file. 

Computes  the  number  of  monthly  occurances  within  a  year  for  each 
year.  The  number  of  occurances  is  the  count  of  the  number  of  times  a 
parameter  falls  below  a  certain  value.  Typically  used  for  computing 
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RES_STAT 

CP_STAT 

STAT1 

DO_RES 

DO_RESl 

DO_RES2 

DO_RES3 

DO_CP 

DO_CPl 

DO_CP2 

DO_CP3 

SYSTEM 

RES_DUR 


the  number  of  months  during  the  year  in  which  a  navigation  level  was 
not  met. 

Computes  statistics  associated  with  reservoirs  and  sets  the  the  units  and 
curve  labels  for  the  statistics  variable.  This  macro  calls  STAT1. 

Computes  statistics  associated  with  control  points  and  sets  the  units 
and  curve  labels  for  the  statistics  variable.  This  macro  calls  ST ATI. 

Computes  statistics  of  an  input  variable.  The  statistics  include  the 
minimum,  maximum,  mean,  standard  deviation,  and  the  sum. 

Primary  reservoir  macro.  It  calls  the  macros  DO_RESl,  RES_STAT, 
DO_RES2,  DO_RES3,  and  RES_DUR.  Those  macros  include  getting 
storage  and  flow  data,  computed  time  series  penalties,  computing 
statistics,  tabulating  the  results,  storing  the  results  in  the  output  DSS 
data  file,  and  computing  duration  statistics. 

Gets  storage,  flows,  and  the  elevation-area-capacity  curve.  Computes 
pool  elevation,  flow  in  cfs,  and  time  series  penalties. 

Sets  formats  for  variables  defined  in  macro  DO_RESl  and 
RES_STAT,  and  tabulates  the  results  to  the  tabulation  file  defined  in 
the  MENUPRM. 

Sets  units  and  pathname  parts  for  variables  defined  in  macro 
DO_RESl,  and  stores  the  data  in  the  output  DSS  data  file. 

Primary  control  point  macro.  It  calls  the  macros  DO_CPl,  CP_STAT, 
DO_CP2,  DO_CP3,  and  CP_DUR.  Those  macros  include  getting  flow 
data,  computing  time  series  penalties,  computing  statistics,  tabulating 
the  results,  storing  the  results  in  the  output  DSS  data  file,  and 
computing  duration  statistics. 

Gets  flows  and  converts  them  to  cfs.  Computes  time  series  penalties. 

Sets  formats  for  variables  defined  in  macro  DO_CPl  and  CP_STAT, 
and  tabulates  the  results  to  the  tabulation  file  defined  in  the 
MENUPRM. 

Sets  units  and  pathname  parts  for  variables  defined  in  macro  DO_CPl, 
and  stores  the  data  in  the  output  DSS  data  file. 

Computes  system  paramaters  above  and  including  Sioux  City.  This 
macro  is  not  complete  as  it  does  not  include  calculations  of 
hydropower. 

Computes  duration  parameters  at  reservoirs.  Includes  values  for 
reservoir  pool  elevation  and  reservoir  release.  Calls  macro 
DURATION. 
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CP.DUR 

DURATION 

POWER 

POWER_P 

POWER  1 
POWER  I  P 

FLOW_LOC 

Q_LOCl 


Computes  duration  parameters  at  control  points  for  flow  in  KAF. 

Calls  macro  DURATION. 

Performs  duration  analysis  for  some  parameter.  It  includes  the  number 
of  hits  within  each  class  interval,  the  accumulated  number  of  hits  both 
in  increasing  and  decreasing  value  direction,  and  computes  the  percent 
values  which  equal  or  exceed  a  given  class  interval. 

Computes  hydropower  energy  and  capacity  at  al!  reservoirs  except 
Gavins  Point. 

Stores  hydropower  var  iables  defined  in  macro  POWER  in  output  DSS 
data  file. 

Computes  the  hydropower  energy  and  capacity  at  Gavins  Point. 

Stores  hydropower  variables  defined  in  macro  POWER  1  in  the  output 
DSS  data  file. 

Computes  adjusted  local  incremental  inflows  at  all  control  points  and 
reservoirs.  It  calls  macro  Q_LOCl. 

Computes  the  adjusted  local  incremental  inflows  at  all  nodes  using  the 
unadjusted  inflow,  the  time  varying  depletions,  and  the  monthly 
varying  depletions. 
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MACRO  DO_PRM  prm_dssfn  pf_dssfn  mpkdssfn  ts_dssfn  alternative  atart_date  end_date 


! RUN  OPEN  prm_dssfn  pf_dasfn  mpk_dasfn  ts_dssfn  start_date  end  date 

! RUN  DORES  FTPK  FTPK-GASR  FTPK-FTPKR  FTPKR-GARR  'alternative' 

! RUN  POWER  FTPK  FTPK  FTPK-FTPKR  'alternative' 

! RUN  POWERP  FTPK  FTPK  FTPK-FTPKR  'alternative' 

! RUN  DO_RES  GARR  GARR-OAHE  GARR-GARRR  GARRR-OAHE  'alternative' 

! RUN  POWER  GARR  GARR  GARR-GARRR  'alternative' 

! RUN  POWERP  GARR  GARR  GARR-GARRR  'alternative' 

! RUN  DO_RES  OAHE  OAHE-BEND  OAHE-OAHER  OAHER-BEND  'alternative' 

! RUN  POWER  OAHE  OAHE  OAHE-OAHER  'alternative' 

! RUN  POWER_P  OAHE  OAHE  OAHE-OAHER  'alternative' 

! RUN  DO_RES  BEND  BEND-FTRA  BEND-BENDR  BENDR-FTRA  'alternative' 

! RUN  POWER  FTRA  BEND  BEND-BENDR  'alternative' 

! RUN  POWER  P  FTRA  BEND  BEND-BENDR  'alternative' 


IRON  DO_RES  FTRA  FTRA-GAPT  FTRA-FTRAR  FTRAR-GAPT  'alternative' 
! RUN  POWER  FTRA  FTRA  FTRA-FTRAR  'alternative' 

IRON  POWER  P  FTRA  FTRA  FTRA-FTRAR  'alternative' 


! RUN  DO_RES  GAPT  GAPT-SUX  GAPT-GAPTR  GAPTR-SUX  'alternative' 
! RON  POWER1  GAPT  GAPT-GAPTR  'alternative' 

! RUN  POWER1  P  GAPT  GAPT-GAPTR  'alternative' 


IRON  DO_CP  SUX-OMA  SUX-OMA  'alternative' 

IRON  DO_CP  OMA-NCNE  OMA-NCNE  'alternative' 

!  RUN  DO_CP  NCNE-MKC  NCNE-MKC  'alternative' 

!  RUN  DO_CP  MKC-BNMO  MKC-BNMO  'alternative' 

!  RUN  DO_CP  BNMO-HEMO  BNMO-HEMO  'alternative' 

!  RUN  DO_CP  HEMO-STL  HEMO-STL  'alternative' 

! RUN  DO_CP  STL-S_SINK  STL-S_SINK  'alternative' 

! RUN  SYSTEM  'alternative' 


FI 

ENDMACRO 
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MACRO  DO_PRM__M  prm_dasfn  pf_dssfn  mpk_dssfn  ts_dssfn  alternative  start  date  end  date 


! RUN  OPEN  pnn_dssfn  pf_dssfn  rapk__dssfn  ts_dssfn  start^date  end_date 

!RUN  DO_RES  FTPK  FTPK-GARR  FTPK-FTPKR  FTPKR-GARR  'alternative' 

IRON  POWER  FTPK  FTPK  FTPK-FTPKR  'alternative' 

IRUN  POWER^P  FTPK  FTPK  FTPK-FTPKR  'alternative' 

IRON  DO_RES  GARR  GARR-OAHE  GARR-OAHER  OAHER-OAHE  'alternative' 

IRUN  POWER  GARR  GARR  GARR-GARRR  'alternative' 

IRUN  POWER  P  GARR  GARR  GARR-GARRR  'alternative' 


IRUN  DO_RES  OAHE  OAHE-BEND  OAHE-OAHER  OAHER-BEND  'alternative' 
IRUN  POWER  OAHE  OAHE  OAHE-OAHER  'alternative' 

IRUN  POWER_P  OAHE  OAHE  OAHE-OAHER  'alternative' 

IRUN  DO_RES  BEND  BEND-FTRA  BEND-BENDR  BENDR-FTRA  'alternative' 
IRUN  POWER  FTRA  BEND  BEND-BENDR  'alternative' 

IRUN  POWER^P  FTRA  BEND  BEND-BENDR  'alternative' 

IRUN  DO_RES  FTRA  FTRA-GAPT  FTRA-FTRAR  FTRAR-GAPT  'alternative' 
IRUN  POWER  FTRA  FTRA  FTRA-FTRAR  'alternative' 

IRUN  POWER_P  FTRA  FTRA  FTRA-FTRAR  'alternative' 

IRON  DO_RES  GAPT  GAPT-SUX  GAPT-GAPTR  GAPTR-SUX  ' alternative' 
IRUN  POWER1  GAPT  GAPT-GAPTR  '  altemvative' 

IRUN  POWERl_P  GAPT  GAPT-GAPTR  'alternative' 

IRUN  DO_CP  SUX-OMA  SUX-OMA  'alternative' 

IRUN  DO_CP  OMA-NCNE  OMA-NCNE  'alternative' 

IRUN  DO_CP  NCNE-MKC  NCNE-MKC  'alternative' 

IRUN  DO_CP  MKC-BNMO  MKC-BNMO  'alternative' 

IRUN  DO_CP  BNMO-HEMO  BNMO-HEMO  'alternative' 

IRUN  DO_CP  HEMO-STL  HEMO-STL  'alternative' 

IRUN  DO  CP  STL-S  SINK  STL-S  SINK  'alternative' 


IRUN  SYSTEM  'alternative' 


FI 

ENDMACRO 


MACRO  DO_PRMl  prm_dssfn  pf__dssfn  mpk_dssfn  ts_dssfn  alternative  start_date  end_date 


IRUN  OPEN  prm_dssfn  pf_dssfn  mpk_dssfn  ts_dssfn  start  date  end_date 
IRUN  DO_RES  FTPK  FTPK-GARR  FTPK-FTPKR  FTPKR-SUX  'alternative' 

IRUN  DOCP  SUX-OMA  SUX-S_SINK  'alternative' 

IRUN  SYSTEM  'alternative' 

FI 

ENDMACRO 


MACRO  DO_MRD  mrd_dssfn  pf_dssfn  mpk_dssfn  ts_dssfn  alternative  start_date  end_date 
IRUN  OPEN  mrd_dssfn  pf_dssfn  mpk__dssfn  ts_dssfn  start_date  end__date 


IRUN 

IRUN 

IRUN 

IRUN 

IRUN 


DO_RES  FTPK  FTPK-GARR  FTPK-GARR  FTPK-GARR 
DO_RES  GARR  GARR-OAHE  GARR-OAHE  GARR-OAHE 
DO_RES  OAHE  OAHE-BEND  OAHE-BEND  OAHE-BEND 
DO_RES  BEND  BEND-FTRA  BEND-FTRA  BEND-FTRA 
DO  RES  FTRA  FTRA-GAPT  FTRA-GAPT  FTRA-GAPT 


'alternative' 
' alternative' 
' alternative' 
' alternative' 
' alternative' 


IRUN  DO_CP  SUX-OMA  SUX-OMA  'alternative' 

IRUN  DO_CP  OMA-NCNE  OMA-NCNE  'alternative' 

IRUN  DO_CP  NCNE-MKC  NCNE-MKC  'alternative' 

IRUN  DO_CP  MKC-BNMO  MKC-BNMO  'alternative' 

IRUN  DOJTP  BNMO-HEMO  BNMO-HEMO  'alternative' 

IRUN  DO_CP  HEMO-STL  HEMO-STL  'alternative' 

IRUN  DO_CP  STL-S_SINK  STL-S_SINK  'alternative' 

ENDMACRO 
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MACRO  OPENl  prm_dssfn  start_yr  end_yr 


IRON  OPEN  prm_dssfn  PENCMP  prm_dssfnO  MRD  31MARstart__yr  28FEBend_yr 
ENDMACRO 


MACRO  OPEN  pnn_dssfn  pf_dssfn  mpk_dssfn  ts_dssfn  start_date  end_date 


OP  prm  dssfn  1 

OP  pf  3ssfn  2 

OP  mpJc  dssfn  3 

OP  ts_3ssfn  4 

OP  HECPRM  5 

TI  start_date  2400  end_date  2400 

. .  Do  not  extrapolate  when  interpolating 

SET . O  FU= TABLE  IEXTR=1 

SET .F  PL=46 
CLEAR 
TA.F-A  V= 

TA.FA 

GET  IXMON  ///MON//1MON//  5 

GET  FACTOR  /FACTOR/ /CFS-KAF//1MON/ /  5 

DEF.T  E=1M0N  V=PENTMP 
SET . V  V= IXMON  FO=(l6) 

ENDMACRO 

MACRO  GET_TS  var_name  river  node  parameter  alternative  file_index 


GET  var_name  A=river  B=node  C=parameter  E=1M0N  F=alternative  file_index 

COM  var_name_CFS=var_name/ FACTOR 

SET.V  V=var_name_CFS  U=CFS  C=parameter (CFS) 

ENDMACRO 
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MACRO  MONVARY  partB  parameter  category  indep_var  depend_var  pfalter  file_index 


..  12  months  of  data  in  one  pathname 

PURGE  V=depend_var 
DEF.T  E=lMON  V=depend_var 
COM  depend_var=0 

PURGE  V=PNLTY_FUNC 

GET  PNLTY_FUNC  A=  B=partB  C=parameter-PNLTY_category  D=  E=  F=pf alter  file_index 

COM  IF (IXMON  EQ  1)  depend_var=TABLE <indep_var,  PNLTY  FUNC(,1),  PNLTY__FUNC ( ,  2)) 

COM  IF (IXMON  EQ  2)  depend_var=TABLE (indep_var ,  PNLTY~FUNC ( , 1) ,  PNLTY_FUNC ( ,  3)) 

COM  IF ( IXMON  EQ  3)  depend_var=TABLE ( indep_var ,  PNLTY  FUNC(,1),  PNLTY_FUNC ( ,  4)) 

COM  IF (IXMON  EQ  4)  depend_var=TABLE (indep_var,  PNLTY~FUNC ( , 1 ) ,  PNLTY_FUNC(,  5) > 

COM  IF (IXMON  EQ  5)  depend_var=TABLE (indep_var,  PNLTY  FUNC(,1),  PNLTY_FUNC(,  6)) 

COM  IF (IXMON  EQ  6)  depend_var=TABLE (indep_var,  PNLTY^FUNC ( , 1 > ,  PNLTY_FUNC ( ,  7)) 

COM  IF (IXMON  EQ  7)  depend_var=TABLE (indep_var ,  PNLTY_FUNC ( , 1 ) ,  PNLTY_FUNC ( ,  8)) 

COM  IF (IXMON  EQ  8)  depend_var=TABLE (indep  var,  PNLTY_FUNC ( , 1 ) ,  PNLTY_FUNC{,  9)) 

COM  IF (IXMON  EQ  9)  depend_var=TABLE (indep~var,  PNLTY_FUNC ( , 1) ,  PNLTY_FUNC { , 10) ) 
COM  IF (IXMON  EQ  10)  depend_va r=TABLE (indep_var,  PNLTY~FUNC ( ,  1 )  ,  PNLTY_FUNC ( , 11) ) 

COM  IF (IXMON  EQ  11)  depend_var STABLE ( indep_var,  PNLTY  FUNC(,1>,  PNLTY_FUNC ( , 12) ) 

COM  IF (IXMON  EQ  12)  depend_va r=TABLE (indep_var,  PNLTY^FUNC ( ,  1 )  ,  PNLTY_FUNC ( , 13) ) 

ENDMACRO 


MACRO  MONVARY 1  partB  parameter  category  indep_var  depend_var  pfalter  file_index 


..Penalty  function  is  stored  in  a  separate  path  for  each  month 


PURGE  V=depend_var 
DEF.T  E=lMON  V=*depend_var 
COM  depend_var=0 

PURGE  V=P JAN, PFEB, PMAR, PAPR, PMAY,  P  JUN, P JUL, PAUG, PSEP , POCT, PNOV, PDEC 
GET  P JAN  A=  B=partB  C=parameter-PNLTY_category  D=  E=JAN  F=pfalter  file_index 

GET  PFEB  A=  B=partB  C=pararoeter-PNLTY_category  D=  E=FEB  F=pfalter  file_index 

GET  PMAR  A=  B=partB  C=parameter-PNLTY_category  D=  E=MAR  F=pfalter  file_index 

GET  PAPR  A=  B=partB  C=parameter-PNLTY_category  D=  E=APR  F=pfalter  file_index 

GET  PMAY  A=  B“partB  C=parameter-PNLTY_category  D=  E=MAY  F=pfalter  file_index 

GET  PJUN  A=  B=partB  C=parameter-PNLTY_category  D=  E=JUN  F=pfalter  file_index 

GET  P JUL  A=  B=partB  C=parameter-PNLTY_category  D=  E= JUL  F=pfalter  file_index 

GET  PAUG  A=  B=partB  C=parameter-PNLTY_category  D=  E=AUG  F=pfalter  file_index 

GET  PSEP  A=  B=partB  C=parameter-PNLTY_category  D=  E=SEP  F=pfalter  file_index 

GET  POCT  A=  B=partB  C=parameter-PNLTY_category  D=  E=OCT  F=pfalter  file_index 

GET  PNOV  A=  B=partB  C=parameter-PNLTY_category  D=  E=NOV  F=pfalter  file_index 

GET  PDEC  A=  B=partB  C=parameter-PNLTY_category  D=  E=DEC  F=pfalter  file_index 

COM  IF (IXMON  EQ  1)  depend_var=TABLE (indep_var,  PJAN(,1),  PJAN(,2)) 

COM  IF (IXMON  EQ  2)  depend_var=TABLE ( indep_var ,  PFEB(,1),  PFEB(,2)> 

COM  IF (IXMON  EQ  3)  depend_var=TABLE (indep_var,  PMAR ( ,  1 ) ,  PMAR(,2)) 

COM  IF ( IXMON  EQ  4)  depend_var=TABLE (indep_var,  PAPR(,1),  PAPR(,2>) 

COM  IF (IXMON  EQ  5)  depend_var=TABLE (indep_var,  PMAY(,1),  PMAY(,2)) 

COM  IF (IXMON  EQ  6)  depend_var=TABLE (indep_var ,  PJUN(,1),  PJUN(,2)) 

COM  IF (IXMON  EQ  7)  depend_var=TABLE ( indep_var,  PJUL(,1),  PJUL(,2)) 

COM  IF ( IXMON  EQ  8)  depend_var=TABLE (indep_var,  PAUG(,1),  PAUG(,2)) 

COM  IF (IXMON  EQ  9)  depend_va r=TABLE ( indep_var,  PSEP(,1),  PSEP {,2)) 

COM  IF (IXMON  EQ  10)  depend_var=TABLE (indep_var,  POCT(,l),  POCT(,2)) 

COM  IF (IXMON  EQ  11)  depend_var=TABLE ( indep_var ,  PNOV(,l),  PNOV(,2)) 

COM  IF (IXMON  EQ  12)  depend_var=TABLE (indep_var,  PDEC(,1),  PDEC(,2)) 

ENDMACRO 


MACRO  MONSAME  partB  parameter  category  indep_var  depend_var  pfalter  file_index 

PURGE  V=depend_var 
DEF.T  E=lMON  V=depend__var 
COM  depend_var=0 

PURGE  V=PNLTY_FUNC 

GET  PNLTY  FUNC  A=  B=partB  C=paramet er-PNLTY_category  D=  E=  F=pfalter  file_index 
COM  depen3_var=TABLE{indep_var,PNLTY_FUNC(, 1) , PNLTY_FUNC < , 2 ) ) 

ENDMACRO 
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MACRO  CLASSDEF  start  end  interval 


COM  NU_CLASS  =  end  -  start  /  interval  +  1 

PURGE  V=CLASS 

DEF.P  V~CLASS(NU_CLASS,2) 

COM  CLASS (/ 1) “1 
COM  CLASS ( ,  2) =interval 
COM  CLASS ( 1 / 2 ) =start 
COM  CLASS=ACCUM (CLASS) 

ENDMACRO 


MACRO  COUNTLO  parameter  min_value  count_mo  count_yr 


PURGE  V=T_PARAM,  count_yr 

DEF.T  E=lMON  V=count_mo,  T_PARAM 

COM  count_mo=0 

COM  T_PARAM=parameter 

COM  IF (SEASON  LT  .5)  T_PARAM=1 . 0E+20 

COM  IF  (T_JPARAM  LT  min_value)  count_mo=l 

COM  count_yr=DERIVE  (count^mo,  1  YEAR,  SUM) 

COM  IF (SEASON  LT  .5)  T_PARAM=parameter 

ENDMACRO 
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MACRO  RES  STAT 


DEF.P  V=RES_STAT<5, 16) 

I RUN  STAT1  STORAGE  1  RES_STAT 

! RUN  STAT1  ELEV_POOL  2  RES_STAT 

IRON  STAT1  RELEASE  3  RES_STAT 

IRON  STAT1  RELEASE_CFS  4  RES_STAT 

IRON  STAT1  HPC_POOL  5  RES_STAT 

IRON  STAT1  REC_POOL  6  RES_STAT 

IRON  STAT1  WSP_POOL  7  RES_STAT 

IRON  STAT1  CMP_POOL  8  RES_STAT 

IRON  STAT1  EDT  POOL  9  RES_STAT 

IRON  STAT1  DIFF_POOL  10  RES_STAT 

IRON  STAT1  HPEREL  11  RES_STAT 

IRON  STAT1  HPE_EDT_REL  12  RES_STAT 

IRON  STAT1  REC_REL  13  RES_STAT 

IRON  STAT1  CMP_REL  14  RES_STAT 

IRON  STAT1  EDT_REL  15  R£S_STAT 

IRON  STAT1  DIFFREL  16  RES_STAT 

SET.V  V=RES_STAT  01=  ,02=  , Tl=  , T2=  ,C= 

SET.VL  V=RES_STAT  1=ELEV_P00L 

SET . VL  V=RES_STAT  2=RELEASE 

SET.VL  V=RES_STAT  3=RELEASE_CFS 

SET.VL  V=RES_STAT  4=HPC_POOL 

SET.VL  V=RES_STAT  5=REC_POOL 

SET.VL  V=RES_STAT  6=WSP_POOL 

SET.VL  V=RES_STAT  7=CMP_POOL 

SET.VL  V=RES_STAT  8=EDT_POOL 

SET.VL  V=RES_STAT  9=DIFF_POOL 

SET.VL  V=RES_STAT  10=HPE_REL 

SET.VL  V=RES_STAT  11=HPE_EDT_REL 

SET.VL  V=RES_STAT  12=REC_REL 

SET.VL  V=RES_STAT  13=CMP_REL 

SET.VL  V=RES_STAT  14=EDT_REL 

SET.VL  V=RES_STAT  15=DIFF  REL 

SET.F  P=(I14,2X,2F10.1,Flff.2,I8,14F10.3> 

ENDMACRO 


MACRO  CP_STAT 

DEF.P  V=CP_STAT(5, 10) 

IRON  STAT1  FLOW  1  CP_STAT 

IRON  STAT1  FLOW_CFS  2  CP_STAT 

IRON  STAT1  FDA_FLOW  3  CP_STAT 

IRON  STAT1  FDO_FLOW  4  CP_STAT 

IRON  STAT1  NAV_FLOW  5  CP_STAT 

IRON  STAT1  REC_FLOW  6  CP_STAT 

IRON  STAT1  WSP_FLOW  7  CP_STAT 

IRON  STAT1  CMP _F LOW  8  CP_STAT 

IRON  STATl  EDT_FLOW  9  CP_STAT 

IRON  STATl  DIFF_FLOW  10  CP_STAT 

SET.V  V=CP_STAT  01=  ,02=  ,T1=  , T2=  ,C= 

SET.VL  V=CP_STAT  1=FL0W_CFS 
SET.VL  V=CP_STAT  2=FDA_FLOW 
SET.VL  V=CP_STAT  3=FDO_FLOW 
SET.VL  V=CP_STAT  4=NAV_FLOW 
SET.VL  V=CP_STAT  5=REC_FL0W 
SET.VL  V=CP_STAT  6=WSP_FLOW 
SET.VL  V=CP_STAT  7=CMP_FLOW 
SET.VL  V=CP_STAT  8=EDT_FLOW 
SET.VL  V=CP_STAT  9=DIFF_FLOW 

SET.F  P=(I14,2X,F10.2,X8,8F10.3) 
ENDMACRO 


C  -  68 


MACRO  STATl  variable  index  var  out 


COM  var_out  ( 1 ,  index)  *=MIN  (variable) 
COM  var_out (2, index) =MAX (variable) 
COM  var_out  (3,  index)  =*MEAN  (variable) 
COM  var_out (4, index) =SD (variable) 
COM  var_out (5, index) *SUM (variable) 
ENDMACRO 


MACRO  DO_RES  rea_node  rel_loc  hpe_loc  relo_loc  alternative 


! RUN  DO_RESl  ' rea_node'  ' rel_loc'  'hpe_loc'  ' relo_loc'  'alternative' 

! RUN  RES_STAT 

IRON  DO_RES2  'rea_node' 

IRON  DO__RES3  'rea_node'  'rel_loc'  'alternative' 

IRON  RES_DOR  'rea_node'  ' rel_loc'  'hpe_loc'  'alternative' 

ENDMACRO 


MACRO  DO_RESl  rea_node  rel_loc  hpe_loc  relo_loc  alternative 


. .  Get  releaae  &  storage 

GET  STORAGE  h~  B=res_node  C=STOR  E=lMON  F=altemative  1 
GET  RELEASE  A=  B=relo_loc  C=FLOW  D=  E=lMON  F=alternative  1 
COM  RELEASE_CFS=RELEASE/FACTOR 
SET .  V  V= RE LEASE  CFS  0=CFS  C«FLOW(CFS) 


PURGE  V^ELARCA 

GET  ELARCA  A=  B=rea_node  C=EL-AR-CAP  D=  E=  F=  2 
DEF.T  E=lMON  V=ELEV  POOL 

COM  ELEV_POOL=TABLETSTORAGE, ELARCA { , 3) , ELARCA ( , 1 ) ) 
SET. V  V-ELEV  POOL  U~FT  T=INST-VAL 


IRON  MONVARY 
IRON  MONVARY 
IRON  MONVARY 
IRON  MONVARY 
IRON  MONVARY 1 


res_node'  STOR  HPC 
rea^node'  STOR  REC 
res~node'  STOR  WSP 
res~node'  STOR  CMP 
re a  node'  STOR  EOT 


STORAGE  HPC_POOL 
STORAGE  REC_POOL 
STORAGE  WSP_POOL 
STORAGE  CMP_POOL 
STORAGE  EDT  POOL 


'  '  2 

/  ,  2 

'  '  2 

'  '  2 

'alternative'  1 


IRON  MONSAME 
1  RUN  MONVARY 1 
1  RUN  MONVARY 
IRON  MONVARY 
IRON  MONVARY 1 


rel_loc'  FLOW  HPE  RELEASE  HPE_REL 
hpe_loc'  FLOW  HPE_EDT  RELEASE  HPE_EDT_REL 
rel  loc'  FLOW  REC  RELEASE  REC_REL~ 
rel'loc'  FLOW  CMP  RELEASE  CMP_REL 
relo  loc'  FLOW  EDT  RELEASE  EDT  REL 


'  '  2 

'alternative'  1 
'  '  2 

'  '  2 

'alternative'  1 


COM  DIFF_POOL=EDT_POOL-CMP_POOL 
COM  DIFF_REL=EDT_REL-CMP_REL 
ENDMACRO 
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MACRO  DO_RES2  res_node 
SET . F  T= (F10 . 1 ) 

SET . V  V=STORAGE  FO=(F10.1) 

SET. V  V=ELEV_POOL  FO= (F10.1)  U=FT 

SET . V  V=RE LEASE  FO=(F10.2) 

SET . V  V=RELEASE_CFS  FO= (18)  U=CFS 

SELECT 

STORAGE 

ELEV_POOL 

RELEASE 

RELEASE_CFS 

HPC_POOL 

REC_POOL 

WSP_POOL 

CMP_POOL 

EDT_POOL 

DIFF__POOL 

HPE_REL 

HPE_EDT_REL 

REC_REL 

CMP_REL 

EDT_REL 

DIFF_REL 

END  ~ 

SET. F  T I LN = 1  TI=res_node 

SET . F  TILN=2  TI= (Reservoir  storage,  elevation,  release,  and  penalties) 

ST.O 
TAB.  A 

SET . F  T I LN = 0 

SET . F  PFLN=1  PFL=' Minimum  ' 

SET . F  PFLN-2  PFL=' Maximum  ' 

SET . F  PFLN=3  PFL='Mean  • 

SET . F  PFLN=4  PFL='Std.  Deviation' 

SET . F  PFLN-5  PFL=' Sum  ' 

TAB. A  V=RES  STAT 
SET . F  PFLN=ff 
ENDMACRO 
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MACRO  DO  RES3  res  node  rel  loc  alternative 


SET.V 

V-STORAGE 

U-KAF 

T=INST-VAL 

A= 

B=rea 

node  C=STOR 

F-alternative 

SET.  V 

V-ELEV  POOL 

U=FT 

T=INST-VAL 

A= 

B=res] 

node  C=ELEV 

F«alternative 

SET.V 

V= RE LEASE 

U-KAF 

T=PER-AVER 

A= 

B=rel" 

"loc  C=FLOW 

F=alternative 

SET.V 

V=RE LEASE  CFS 

U=CFS 

T=PER-AVER 

A= 

B=rel 

loc  C=FDOW(CFS) 

F=alternative 

SET.V 

V-HPC  POOL 

U-K$ 

T-PER-AVER 

A= 

B=rea* 

"node  C=PNLTY  HPC 

F=al t ernat ive 

SET.V 

V=*REC  POOL 

U*K$ 

T-PER-AVER 

A- 

B=res 

node  C=PNLTY  REC 

F=alternative 

SET.V 

V=WSP  POOL 

U-K$ 

T=PER-AVER 

A= 

B=res^ 

"node  C=PNLTY  WSP 

F=alternative 

SET.V 

V=CMP  POOL 

U=K$ 

T=PER-AVER 

A= 

B=res 

node  C=P(JLTY  CMP 

F— alternative 

SET.V 

V-EDT  POOL 

U«K$ 

T=PER-AVER 

A= 

B=res 

'node  C=PNLTY  EDT 

F=alternative 

SET.V 

V=DIFF  POOL 

U*K$ 

T-PER-AVER 

A= 

B=res 

node  C=PNLTY  DIFF 

F-alternative 

SET.V 

V-HPE  REL 

U*K$ 

T-PER-AVER 

A= 

B=rel 

loc  C=PNLTY  HPE 

F=alternative 

SET.V 

V-HPE  EDT  REL 

U=KS 

T-PER-AVER 

A® 

B-rel 

'loc  C=PNLTY  HPE  EDT 

F-alternative 

SET.V 

V=REC  REL 

U-K$ 

T-PER-AVER 

A= 

B=rel[ 

loc  C— PNLTY  REC 

F=alternative 

SET.V 

V==CMP  REL 

U«K$ 

T=PER-AVER 

A- 

B=rel 

'loc  C=PNLTY  CMP 

F=alternative 

SET.V 

V=EDT  REL 

U-K$ 

T-PER-AVER 

A- 

B=rel 

loc  C=PNLTY  EDT 

F-alternative 

SET.V 

V=DIFF  REL 

U=K$ 

T=PER-AVER 

A= 

B-rel' 

'loc  C=PNLTY  DIFF 

F-alternative 

PUT  STORAGE  3 
PUT  ELEV_POOL  3 
PUT  RELEASE  3 
PUT  RELEASB_CFS  3 
PUT  HPC_POOL  3 
PUT  RE C_ POOL  3 
PUT  WSP_POOL  3 
PUT  CMP _ POOL  3 
PUT  EDT_POOL  3 
PUT  DIFF_POOL  3 
PUT  HPE_REL  3 
PUT  HPE_EDT_REL  3 
PUT  REC_REL  3 
PUT  CMP_REL  3 
PUT  EDT_REL  3 
PUT  DIFF_REL  3 

endm; CRO 
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MACRO  DO_CP  loc_nonn  loc_job  alternative 


! RUN  DO_CPl  'loc_norm'  9  loc_ job'  'alternative' 
! RUN  CP_STAT 
! RUN  DO_CP2  ' loc_norm' 

! RUN  DO_CP3  'loc_norm'  'alternative' 

l RUN  CP_DUR  'loc__norm'  '  loc_job'  'alternative' 

ENDMACRO 

MACRO  DO_CPl  loc_norm  loc_job  alternative 


GET  FLOW  A=  B=loc  job  C=FLOW  D=  E=1M0N  F=*altemat  ive  1 

COM  flow_cfs=flow7factor 

SET . V  V-FLOW  CFS  U=CFS  C=FLOW(CFS) 


!  RUN 

MONVARY  ' 

'  loc 

norm' 

FLOW 

FDA 

FLOW 

FDA 

FLOW 

/ 

2 

!  RUN 

MONVARY  ' 

’  loc" 

norm' 

FLOW 

FDU 

FLOW 

FDU- 

"FLOW 

t 

2 

!  RUN 

MONVARY  ' 

1  loc 

"norm' 

FLOW 

NAV 

FLOW 

NAV~ 

"FLOW 

r 

2 

[RUN 

MONVARY  1 

'  loc 

norm' 

FLOW 

REC 

FLOW 

REC" 

"flow 

t 

2 

[RUN 

MONVARY  ' 

'  loc 

’norm' 

FLOW 

WSP 

FLOW 

WSP" 

"FLOW 

9 

2 

[RUN 

MONVARY  ' 

'  loc 

norm' 

FLOW 

CMP 

FLOW 

CMP" 

"FLOW 

9 

2 

[RUN 

MONVARY 1 

' loc  job' 

FLOW 

EDT 

FLOW 

EDT“ 

"FLOW 

alternative' 

COM  DIF F_F LOW= EDT_F  LOW-  CMP  _F LOW 
ENDMACRO 


MACRO  DO  CP2  loc  norm 


PENTMP=0 
SET . F  T=(F10.1) 
SET . V  V»FLOW 
SET . V  V=FLOW_CFS 

SELECT 

FLOW 

FLOW_CFS 

FDA_FLOW 

FDU_FLOW 

NAV_FLOW 

REC_FLOW 

WSP_FLOW 

CMP_FLOW 

EDT_FLOW 

DIFF_FLOW 

END 


SET .  F 

TILN=1 

TI=loc_norm 

SET .  F 
TAB. A 

TILN=2 

TI= (Flow  and  penalty) 

SET .  F 

PFLN=1 

PFL=' Minimum  ' 

SET .  F 

PFLN=2 

PFL-' Maximum  ' 

SET .  F 

PFLN=3 

PFL=' Mean  ' 

SET .  F 

PFLN=4 

PFL='Std.  Deviation' 

SET.F 

PFLN=5 

PFL=' Sum  ' 

SET.F 

TILN=0 

TAB. A 

V*CP  STAT 

SET.F 

PFLN=0 

ENDMACRO 

FO= (FlO .2) 
FO= ( 18 ) 
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MACRO  DO  CP3  loc  norm  alternative 


SET .V  V=FLOW 
SET . V  V=FLOW_CFS 
SET . V  V=FDA_FLOW 
SET . V  V=FDU_FLOW 
SET . V  V=NAV_FLOW 
SET . V  V=REC_FLOW 
SET . V  V=WSP_FLOW 
SET . V  V=CMP_FLOW 
SET . V  V=EDT_FLOW 
SET . V  V=DIFF  FLOW 


U=KAF  T=PER-AVER  A=  B=loc_norm  C=FLOW 
U=KAF  T=PER-AVER  A=  B=loc  norm  C=FLOW 


U=CFS 

T=PER-AVER 

A=  B=loc 

norm 

C=FLOW{CFS) 

U=K$ 

T=PER-AVER 

A=  B=loc 

norm 

C=PNLTY  FDU 

U=K$ 

T=PER- AVER 

A=  B=loc 

norm 

C=PNLTY  NAV 

U=K$ 

T=PER-AVER 

A=  B=loc 

norm 

C=PNLTY  REC 

U=K$ 

T=PER-AVER 

A=  B=loc“ 

norm 

C=PNLTY  WSP 

U=K$ 

T=PER-AVER 

A=  B=loc 

norm 

C=PNLTY  CMP 

U=K$ 

T=PER-AVER 

A=  B=loc 

norm 

C=PNLTY  EDT 

U=KS 

T=PER-AVER 

A-=  B=loc 

norm 

C=PNLTY  DIFF 

F=alternat ive 
F=alternative 
F=alternative 
F=alternative 
F=alternative 
F=alternative 
F=alternative 
F=alternative 
F=alternati  ve 
F=alternative 


PUT  FLOW  3 
PUT  FLOW__CFS  3 
PUT  FDA_FLOW  3 
PUT  FDU_FLOW  3 
PUT  N A V_F LOW  3 
PUT  REC_FLOW  3 
PUT  WSP_FLOW  3 
PUT  CMP_FLOW  3 
PUT  EDT_FLOW  3 
PUT  DIFF  FLOW  3 
ENDMACRO~ 
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MACRO  SYSTEM  alternative 


GET  IN_FTPK  //FTPK/FLOW_LOC_INC//lMON//  4 
GET  DPL_FTPK  //FTPK/FLOW  LOC_DPL/ / 1MON//  4 
GET  EVAP_FTPK  //FTPK/EVAP7/lMON/alternative/  1 
GET  STOR_FTPK  //FTPK/STOR//lMON/alternative/  1 

GET  IN_GARR  //GARR/FLOW_LOC_INC//lMON//  4 
GET  DPL_GARR  //GARR/FLOW  LOC_DPL//lMON//  4 
GET  EVAP_GARR  //GARR/EVAP7/lMON/alternat i ve/  1 
GET  STOR_GARR  //GARR/STOR//lMON/alternative/  1 

GET  IN_OAHE  //OAHE/FLOW_LOC_INC//lMON//  4 
GET  DPL_OAHE  //OAHE/FLOW  LOC_DPL//lMON//  4 
GET  EVAP_OAHE  //OAHE/EVAP7/lMON/alternative/  1 
GET  STOR_OAHE  //OAHE/STOR//lMON/alternative/  1 

GET  EVAP_BEND  //BEND/EVAP//lMON/alternative/  1 
GET  STOR_BEND  //BEND/STOR//lMON/alternative/  1 

GET  IN_FTRA  //FTRA/FLOW_LOC_INC//1MON//  4 
GET  DPL_FTRA  / /FTRA/FLOW  LOC_DPL//lMON//  4 
GET  EVAP_FTRA  / /FTRA/EVAP7/ IMON/alternative/  1 
GET  STOR_FTRA  //FTRA/STOR//lMON/alternative/  1 

GET  IN_GAPT  //GAPT/FLOW_LOC_INC//lMON//  4 
GET  DPL_GAPT  //GAPT/FLOW  LOC_DPL//lMON//  4 
GET  EVAP_GAPT  //GAPT/EVAP7/lMON/alternative/  1 
GET  STOR_GAPT  //GAPT/STOR//lMON/alternative/  1 

DEF.T  E=lMON  V=IN_SYS, DPLSYS, EVAPSYS, STOR  SYS, 

DEF.T  E=lMON  V=APOW_SYS, PPOWSYS, ENRGYSYS, NAV_LVL, NAV_LKGTH 

COM  IF(IN_FTPK  LE  -1E+29)  INFTPK  -0.0 

COM  IF(DPL_FTPK  LE  -1E+29)  DPL_FTPK  «=0.0 

COM  IF(EVAP_FTPK  LE  -1E+29)  EVAPFTPK  »0 . 0 

COM  IF(STOR_FTPK  LE  -1E+29)  STORFTPK  =0.0 

COM  IF(1N_GARR  LE  -1E  +  29)  IN  GARR  =0.0 

COM  IF(DPL_GARR  LE  -1E+29)  DPL_GARR  =0.0 

COM  IF(EVAP_GARR  LE  -1E+29)  EVAP  GARR  =0.0 

COM  IFISTORGARR  LE  -1E+29)  STOR_GARR  =0.0 

COM  IF(XN_OAHE  LE  -1E+29)  XNOAHE  =0.0 

COM  IF(DPL_OAHE  LE  -1E+29)  DPL_OAHE  =0.0 

COM  IF(EVAP_OAHE  LE  -1E+29)  EVAP_OAHE  =0.0 

COM  IF (STOR_OAHE  LE  -1E+29)  STOR_OAHE  =0.0 

COM  IF(EVAP_BEND  LE  -1E+29)  EVAPBEND  =0.0 

COM  IF (STOR_BEND  LE  -1E+29)  STOR_BEND  =0.0 

COM  IF ( IN_FTRA  LE  -1E+29)  INFTRA  =0.0 

COM  IF(DPL_FTRA  LE  -1E+29)  DPL_FTRA  =0.0 

COM  IF(EVAP_FTRA  LE  -1E+29)  EVAPFTRA  =0.0 

COM  IF (STOR_FTRA  LE  -1E+29)  STOR_FTRA  =0.0 

COM  IF(IN_GAPT  LE  -1E+29)  INGAPT  =0.0 

COM  IF (DPL_GAPT  LE  -1E+29)  DPL_GAPT  =0.0 

COM  IF  (EVAP_GAPT  LE  -1E+29)  EVAP_GAPT  =0.0 

COM  IF(STOR_GAPT  LE  - IE+29)  STOR_GAPT  =0.0 

COM  IN_SYS  =  IN_FTPK+IN_GARR+IN_OAHE+IN_FTRA+IN_GAPT 
COM  DPL_SYS=DPL_FTPK+DPL_GARR+DPL_OAHE+DPL_FTRA+DPL_GAPT 

COM  EVAP_SYS=EVAP_FTPK  +  EVAP_GARR+EVAP_OA  5+EVAP_BEND+EVAP  FTRA+EVAP  GAPT 
COM  STOR_SYS=STOR_FTPK+STOR_GARR+STOR_OA  '  I+STOR_BEND+STOR  FTRA+STOR_GAPT 

TAB.  F  V=EVAP_FTPK,  STOR  FTPK,  EVAP_GARR,  STOR_GARR 
TAB . F  V=IN_SYS,EVAP_SYS,DPL_SYS,STOR_SYS 

TAB. F  V=STOR_FTPK, STOR_GARR, STOR_OAHE, STOR_BEND, STOR_FTRA, STOR_GAPT, STOR_SYS 

ST.V4 

CLEAR 

ENDMACRO 
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MACRO  RES  DOR  res  node  rel  loc  relo  loc  alternative 


IRON  DORATION 
POT  DOR 
POT  LACCUMDUR 
POT  HACCUMDOR 
POT  PCTEXCEED 


'res  node'  ' res_node'  ELEV  'alternative' 
3  - 
3 
3 
3 


! RON  DORATION  ' rel_loc'  '  rel_loc'  PLOW  'alternative' 

POT  DOR  3 

PUT  LACCUMDUR  3 

PUT  HACCUMDUR  3 

PUT  PCTEXCEED  3 


ENDMACRO 


MACRO  CPDUR  loc_norm  loc_job  alternative 


! RUN  DURATION  '  loc_norra' 
PUT  DUR  3 

PUT  LACCUMDUR  3 

PUT  HACCUMDUR  3 

PUT  PCTEXCEED  3 


' loc_job'  P LOW  'alternative' 


ENDMACRO 
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MACRO  DURATION  loc_noria  loc_job  parameter  alternative 

PURGE  V=CLASS, PARAMETER, DUR,  LACCUMDUR, TOTLDUR, HACCUMDUR, PCTEXCEED, DUR_SUMRY 

GET  CLASS  //loc  norm/ INDEX- parameter  CLASS  INTRVL////  2 
GET  PARAMETER  /7loc_nonn/parameter//TMON/aTternative/  3 

DEF . C  V=NU_CLASS, KU_CLASS, MAX_PARM, MAX_CLASS , MAX_CLASSl 

COM  NU_CLASS=COUNT {CLASS ( , 1 ) ) 

COM  KU_C LAS S=NU_C LASS 
COM  MAXPARM-MAX (PARAMETER) 

COM  MAX_CLASS=MAX (CLASS {,2) ) 

COM  IF (MAX_PARM.GT.MAX_CLASS)  NU_CLASS=NU_CLASS+ 1 
COM  MAX _C LASS 1=ABS (MAX_CLASS) 

COM  MAXCLASS 1= . 0 1 *MAX_CLASS 1 +MAX_CLASS 

DEF.P  V=DUR(NU_CLASS,14) 

SET.VL  V-DUR  L=JAN  FEB  MAR  APR  MAY  JUN  JUL  AUG  SEP  OCT  NOV  DEC  TOT 
COM  DUR  (, 1 )  =CLASS ( ,  2) 

COM  IF(NU_CLASS.GT.KU_CLASS)  DUR (NU_CLASS, 1 >  =MAX_CLASS 
DEF . P  V=DUR_SUMRY ( NU_CLASS ,  5  ) 

COM  I F ( I XMON . EQ .  1)  DUR ( ,  2) =DURATION (PARAMETER, DUR ( f 1) ) 

COM  I F { I XMON . EQ .  2)  DUR(,  3) ^DURATION (PARAMETER, DUR {, 1) ) 

COM  I F { I XMON . EQ .  3)  DUR ( ,  4 ) =DURATION (PARAMETER, DUR (, 1 ) ) 

COM  I F ( I XMON . EQ .  4)  DUR(,  5) =DURAT ION (PARAMETER, DUR (, 1) ) 

COM  I F ( I XMON  *  EQ .  5)  DUR(,  6) =DURAT ION (PARAMETER, DUR (, 1 ) ) 

COM  IF { IXMON . EQ.  6)  DUR(,  7) =DURAT ION (PARAMETER, DUR (, 1 ) ) 

COM  IF ( IXMON. EQ.  7)  DUR{,  8) =DURAT ION (PARAMETER, DUR (, 1 ) > 

COM  IF ( IXMON.EQ.  8)  DUR{,  9) =DURATION (PARAMETER, DUR (, 1 ) ) 

COM  IF (IXMON.EQ.  9)  DUR (, 1 0) =DURAT ION (PARAMETER, DUR (, 1 ) ) 

COM  I F ( I XMON . EQ .10)  DUR (, 1 1 ) =DURATION (PARAMETER, DUR (, 1 ) ) 

COM  I F { I XMON . EQ .11)  DUR (, 12) =DURATION (PARAMETER, DUR (, 1) ) 

COM  IF (IXMON.EQ. 12)  DUR (, 13) =DURAT ION (PARAMETER, DUR (, 1 ) ) 

COM  DUR ( , 1 4 ) =DURATION ( PARAMETER, DUR ( , 1 ) ) 

DEF.P  V=LACCUMDUR(NU_CLASS, 14) ,  TOTLDUR ( 1 , 14 ) 

DEF.P  V=HACCUMDUR(NU_CLASS, 14) ,  PCTEXCEED (NU_CLASS, 14) 

COM  LACCUMDUR ( , 1 ) =DUR ( , 1 ) 

COM  TOTLDUR {, 1)=0 

COM  HACCUMDUR ( , 1 ) =DUR ( , 1 ) 

COM  PCTEXCEED (,1)=DUR{,1) 

COM  LACCUMDUR (, 2-1 4 ) =ACCUM (DUR { , 2-14) ) 

COM  TOTLDUR ( ,2-14) =SUM(DUR ( ,  2-14)  ) 

COM  HACCUMDUR (,2-14) =TOTLDUR (1,2-14) -LACCUMDUR (,2-14) 

COM  PCTEXCEED (,2-14) =HACCUMDUR(, 2-14) /TOTLDUR{, 2-14)  *  100.0 

COM  DUR_SUMRY(, 1 ) =DUR ( , 1) 

COM  DUR_SUMRY(,2)~DUR(,  14) 

COM  DUR_SUMRY(,3)=LACCUMDUR(,14) 

COM  DUR_SUMRY(,4)=HACCUMDUR(,14) 

COM  DUR_SUMRY(,5)=PCTEXCEED(,14) 

SET.VL  V=DUR  L=JAN  FEB  MAR  APR  MAY  JUN  JUL  AUG  SEP  OCT  NOV  DEC  TOT 

SET . V  V=DUR  A=  B=loc_norro  C=parameter-NU_INCLASS  D=  E=  F=alternat i ve 
SET . V  V=DUR  IHORIZ*l 

SET.VL  V=TOTLDUR  L=JAN  FEB  MAR  APR  MAY  JUN  JUL  AUG  SEP  OCT  NOV  D 

SET . V  V=TOTLDUR  A=  B=loc_norm  C=parameter-NU_INCLASS_TOT  D=  E=  F=alternat ive 

SET . V  V=TOTLDUR  IHORIZ=l 

SET.VL  V= LACCUMDUR  L=JAN  FEB  MAR  APR  MAY  JUN  JUL  AUG  SEP  OCT  NOV  DEC  TOT 

SET . V  V= LACCUMDUR  A=  B=loc  norm  C=pa rameter-NU_INCLASS_CUMLO  D=  E=  F=alt ernat ive 

SET . V  V= LACCUMDUR  IHORIZ^l 

SET.VL  V=HACCUMDUR  L=JAN  FEB  MAR  APR  MAY  JUN  JUL  AUG  SEP  OCT  NOV  DEC  TOT 
SET.V  V= HACCUMDUR  A=  B=loc^norm  C=parameter-NU_INCLASS  CUMHI  D=  E=  F=alternat i ve 
SET . V  V=HACCUMDUR  IHORIZ=l  ~ 

SET.VL  V= PCTEXCEED  L=JAN  FEB  MAR  APR  MAY  JUN  JUL  AUG  SEP  OCT  NOV  DEC  TOT 

SET.V  V=PCTEXCEED  A=  B=loc_norm  C=pa ramet er -NU_INCLASS_CUMHI_PCT  D=  E=  F=al ternat ive 

SET.V  V -PCTEXCEED  IHORIZ=l 

SET.VL  V=DUR_SUMRY  LIMITS , * L  ACCUM' ,  ' H  ACCUM' , ' EXCEED  %' 

SET.V  V=DUR_SUMRY  A=  B=loc_norm  C=pa rameter-NU_INCLASS_SUMRY  D=  E=  F=al ternat ive 
SET.  V  V  =r DUR  SUMR Y  IHORIZ-1 

KW-MA^PO 
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MACRO  POWER  rea  node  node  coeff  relo_loc  alternative 


PURGE  V=POW_STORAGE,  RELEASE,  R£LEASE_CFS,  ENRGYCOEFF,  ENERGY,  CAPACITY 

GET  POW_STORACE  A=  B=res_node  C=STOR  E=1M0N  F=alternative  1 

GET  RELEASE  A=  B=relo_loc  C=FLOW  D=  E=lMON  F=alternative  1 

COM  RELEASE_CFS=RELEAS E / FACTOR 

COM  RELEASE_KCFS=R£L£ASE_CFS/1000 

SET .V  V=RELEASE_KCFS  U=KCFS  C=FLOW(CFS) 

PURGE  V=ELARCA 

GET  ELARCA  A=  B=res_node  C=EL-AR-CAP  D=  E=  F=  2 
DEF.T  E=lMON  V=ELEV_POOL 

COM  ELEV_POOL=TABLE  ( POW_STORAGE ,  ELARCA  ( ,  3 )  ,  ELARCA  ( ,  1  >  ) 

SET.V  V=ELEV_POOL  U=FT  T=INST-VAL 

GET  ENRGYCOEFF  //node_coef £/EL-COEFF_ENRGY////  2 

COM  A=TABLEM ( ELEVPOOL , ENRGYCOEFF ( , 1 ) , ENRGYCOEFF ( , 2 ) ) 

COM  B=TABLEM (ELEVPOOL, ENRGYCOEFF ( , 1 ) , ENRGYCOEFF ( , 3) ) 

COM  CAPACITY=TABLE (ELEVPOOL, ENRGYCOEFF ( , 1 ) , ENRGYCOEFF ( , 4 ) ) 

COM  ENERGY=RELEASE_KCFS*A+B 

ENDMACRO 


MACRO  POWER  P  res  node  node  coeff  relo  loc  alternative 


SET.V  V— ENERGY  U=KMWH  T=UNT  A=  B=node_coeff  C=ENERGY  F= 
SET.V  V=CAPACITY  U=MW  T=UNT  A=  B=node_coeff  C=POWER_PEAK  F= 
PUT  CAPACITY  3 

PUT  ENERGY  3 

ENDMACRO 
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MACRO  POWER1  res  node  relo  loc  alternative 


PURGE  V=RELEASE,RELEASE_CFS 

GET  RELEASE  A=  B=relo_loc  C=FLOW  D=  E=1M0N  F=alternative  1 

COM  RE LEASE_CFS=R£ LEASE /FACTOR 

COM  RELEASE_KCFS=RELEASE_CFS/1000 

SET . V  V=RELEASE_KCFS  U=KCFS  C=FLOW(CFS) 

GET  ENRGYCOEFF  //res_node/FLOW-POWER////  2 

COM  ENERGY=TABLE ( RELEASE_KCFS , ENRGYCOEFF ( , 1 ) , ENRGYCOEFF ( , 2 ) ) 
COM  CAPACITY=TABLE (RELEASE_KCFS, ENRGYCOEFF ( , 3) , ENRGYCOEFF ( , 4) ) 

ENDMACRO 


MACRO  POWER 1  P  res  node  relo  loc  alternative 


SET.V  V=ENERGY  U=KMWH  T=UNT  A=  B=node_coeff  C-ENERGY  F= 
SET.V  V=CAPACITY  U=MW  T-UNT  A=  B=node_coe££  C=?OWER_PEAK  F= 
PUT  CAPACITY  3 

PUT  ENERGY  3 

ENDMACRO 
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MACRO  FLOW_LOC  id_depletion 


! RUN  Q_LOCl  FTPK 
! RUN  Q_LOCl  GARR 
! RUN  Q_LOCl  OAHE 
I RUN  Q_LOCl 
! RUN  Q_LOC 1  FTRA 
! RUN  Q_LOCl  GAPT 
! RUN  Q_LOCl  SUX 
'RUN  Q_LOC2  OMA 
! RUN  Q_LOCl  NONE 
!  RUN  Q__LOCl  MKC 
! RUN  Q_LOCl  BNMO 
! RUN  Q  LOCI  HEMO 
ENDMACRO 


id_depletion 
id_deplet ion 
id_depletion 
BEND  id_depletion 
id_d©pletion 
id_d©pletion 
id_depletion 
id_depl©tion 
id_depletion 
id_depletion 
id_deplet ion 
id__depletion 


MACRO  Q_LOCl  location  id_depletion 


PURGE  V=Q_ADJ, Q_DPL,Q_LOC 

GET  Q_LOC  //Iocation/FLOW_LOC_INC//1MON//  1 

GET  Q_DPL  A=  B=location  C=FLOW_LOC_DPL  E=1M0N  F=id_deplet ion  1 
GET  QM_DPL  A=  B=location  C=MON-FLOW  DPL  D=  E=  F=  1 
GET  MONTH  A=  B=  C=MON  E=lMON  F=  I 
COMP  Q_ADJ=Q_LOC+Q_DPL 

COM  IF (MONTH 
COM  IF (MONTH 
COM  IF (MONTH 
COM  IF (MONTH 
COM  IF (MONTH 
COM  IF (MONTH 
COM  IF (MONTH 
COM  IF (MONTH 
COM  IF (MONTH 
COM  IF (MONTH 
COM  IF (MONTH 
COM  IF (MONTH 

SET . V  V=Q_ADJ  U=KAF  C=FLOW_LOC  F= 

PUT  Q_ADJ  1 
ENDMACRO 


EQ  1)  Q_ADJ=Q_ADJ-QM_DPL(  1,2) 
EQ  2)  Q__ADJ=Q_ADJ-QM_DPL (  2,2) 
EQ  3)  Q_ADJ=Q_AD J-QM_DPL (  3,2) 
EQ  4)  Q_ADJ=Q_ADJ-QM_DPL (  4,2) 
EQ  5)  Q__AD J=Q_ADJ-QM_DPL (  5,2) 
EQ  6)  Q_AD J =Q_ AD J - QM_D P L (  6,2) 
EQ  7)  Q_AD  J=Q__AD  J-QMJDPL  (  1,2) 
EQ  8)  Q_AD J=Q_AD J-QM_DPL (  8,2) 
EQ  9)  Q_AD  J=Q__AD  J-QMDPL  (  9,2) 
EQ  10)  Q_AD J=Q_AD J-QM_DPL (10,2) 
EQ  11)  Q_ADJ=Q_ADJ-QM_DPL(11,2) 
EQ  12)  Q  ADJ=Q  ADJ-QM  DPL (12, 2) 
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Proposed  Hydropower  Algorithm  for  HEC-PRM 


The  steps  of  the  hydropower  algorithm  for  HEC-PRM  are  as  follows. 

STEP  A  (Initialize): 


Set  ITER  (iteration  coi'nter)  =  0. 

Set  ITMAX  =  the  maximum  number  of  iterations  allowed  (must  be  >  1). 

Set  CANDPEN  (candidate  optimal  objective  function  value)  =  a  very  large 
number. 

Set  A /?_  =  0.50. 

(The  Mar./Apr.  1991  issue  of  the  ASCE  Journal  of  Water  Resources 
Planning  and  Management  (vol.  117,  no.  2)  includes  the  paper 
"Reservoir  operations  by  successive  linear  programming,"  by  Tao  Tao 
and  W.C.  Lennox  on  pgs.  274-280.  In  this  paper,  these  researchers 
conclude  "...  search  speed  can  be  improved  by  simply  taking  the  initial 
step  sizes  to  be  one  half  of  the  differences  of  the  lower  and  upper 
bounds  of  the  variable  concerned  and  halving  the  step  sizes  for  each 
iteration."] 

Set  RtMpp„  -  release  corresponding  to  maximum  power  generation  at  maximum 
head  for  reservoir  j. 

and  RJVP„  are  used  in  constraining  release  in  Step  C,  and  are 
subject  to  change  as  HEC  collects  information  on  performance  with 
alternative  values]. 


For  each  reservoir  j,  for  each  period  t,  estimate  Sjr,  the  end-of-period  storage. 
Go  to  Step  B. 
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STEP  B  (Set  up  the  network): 


Set  ITER  =  ITER  +1. 

If  ITER  >  ITMAX 

Declare  the  candidate  solution  the  optimal  solution  and  stop. 


Else  if  ITER  £  ITMAX 

Use  the  elevation-capacity  function  for  reservoir  j  to  determine  the 
end-of-period  head. 

Average  the  beginning-of-period  and  end-of-period  heads. 

Select  the  "closest"  user-provided  linear  approximation  of  the 
hydropower  penalty  function  for  each  reservoir  each  period. 

Set  up  the  system  network  with  arc  bounds  and  costs  to  represent 
these  hydropower  penalty  functions,  along  with  flow  and  storage 
penalty  functions  for  other  purposes. 

Go  to  Step  C. 


STEP  C  (Limit  variation): 

If  ITER  =  1,  go  to  Step  D. 

Else  if  ITER  >  1 

Constrain  flow  on  the  reservoir  hydropower-release  links  so  the  total 
release  does  not  vary  from  the  candidate  solution  by  more  than 
A The  link  lower  bound  would  be  Rjt  *  (1  -  AR^,  and  the 
upper  bound  would  be  RJ:(  1  +  A R^J. 

If  the  candidate  release  is  zero,  set  the  upper  bound  equal  . 

Go  to  Step  D. 
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STEP  D  (Solve  the  network): 

Solve  the  resulting  flow-allocation  problem  to  And  CURRPEN,  the  penalty 
associated  with  the  current  approximation.  Use  the  best  available  network 
solver  at  this  step.  If  a  previous  network  solution  is  available,  and  if  the 
solver  can  use  it  as  a  starting  point,  let  it. 

Go  to  Step  E. 


STEP  E  (Check  for  solution  to  nonlinear  problem): 

For  each  reservoir  j,  for  each  period  t,  determine  and  Sjj  from  the  current 
solution  of  the  network. 

Do  these  values  differ  from  the  values  used  in  Step  B  to  select  the 
approximation? 

If  all  are  close  enough,  declare  the  current  solution  optimal  and 
stop. 

Else,  go  to  Step  F. 

STEP  F  (Update  candidate  solution): 

If  CURRPEN  <  CANDPEN, 

it  is  an  improvement,  so  save  the  current  solution  (storages,  releases,  etc.) 
as  the  candidate  optimal  solution,  set  CANDPEN  =  CURRPEN,  and  go  to 
Step  B. 

Else  if  CURRPEN  >  CANDPEN 
go  to  Step  G. 


STEP  Q  (Decrease  the  allowable  variation): 

Set  =  AR'Jl. 

If  AR^  <  minimum  value 

declare  the  candidate  solution  optimal  and  stop. 


Else 


go  to  Step  B. 
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Workshop  Agenda 


Day  1 

Mon,  December  2 
8:30-  9:00 

9:00  -  10:00 
10:00  - 10:20 
10:20-11:45 


1:00-  2:00 


2:15  -  4:30 


HEC-PRM  Workshop  For  MRD 
December  2-4, 1991 


Overview  of  HEC’s  Proposal  to  MRD  for  Phases  I  and  II.  Discussion  of  the 
current  status  of  the  MRD  Study.  (Burnham) 

Overview  PRM  Concepts,  it’s  role  in  MRD’s  Study.  (Ford) 

Break 

Overview  of  MENUPRM  and  the  Programs  accessible  from  MENUPRM. 
Discussion  of  the  purpose  of  each  program  and  their  interrelationships. 

Hands  On  use  of  RDATA0  and  RDMATF  (flow  data  input).  Store  results  from 
MRD’s  simulation  model  using  VI. EXE  and  RDMATF.  Storing  MRD’s  input 
data  set  D0DATA  using  RDATA0.  (Carl) 

Overview  of  DSS  including  data  conventions  (regular  time  series  and  paired 
data),  programs  DSSUTL,  DSPLAY,  DSSPD,  MATHPK,  and  HEC-PRM. 
Coverage  of  basic  files  and  related  commands  (CAtalogue.new, condensed, sorted; 
DisPlay  pathnames,  selective  catalog.  Duplicating  pathnames,  EDiting  data). 
(Hayes) 

Description  of  pathname  parts  used  in  MRD  study  and  recommended  procedures 
for  entering,  transferring,  and  naming  data. 

Hands-On  Application  of  flow  data  files  including  DSPLAY,  DSSUTL, 
MATHPK.  Use  MATHPK  to  compute  adjusted  local  flows  from  incremental 
inflows  and  depletions  (both  regular  interval  and  monthly  constant).  Use 
DSSUTL  to  obtain  both  a  new  and  condensed  catalogs.  Use  DSPLAY  to  plot 
inflows.  (Hurst,  Hayes) 
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Day  2 

Tue,  December  3 


Preparation: 

8:00-  9:15 

9:30-11:45 

1:00-  2:00 

2:00-  2:30 

2:45-  3:15 

3:15-  4:30 

Day  3 

Wed,  December  4 
8:00-  9:30 

9:30-  9:45 
9:45  -11:00 
11:00  - 12:00 


Already  make  a  run  of  HEC-PRM  for  "base"  conditions. 

Explanation  of  penalty  function  concepts  and  method  of  derivation  for  MRD. 
Describe  use  of  Lotus  for  computing  penalty  functions  and  generating  .PRN  file 
for  use  as  input  to  DSSPD.  (Moser) 

Continue  previous  lecture.  Hands  on  editing  of  penalty  functions  for  Run2 
(modified  navigation  penalty  function  at  Sioux  City)  using  Lotus.  Compute 
composite  curve  using  either  Lotus  or  MATHPK.  Derive  edited,  convex, 
composite  penalty  function  using  graphical  editing  capability  of  DSPLAY. 
(Moser,  Hurst) 

Description  of  HEC-PRM  ASCII  data  input  and  the  use  of  COED  from 
MENUPRM  to  enter  /  edit  the  file.  (Carl) 

Hands-On  Input  for  Run2  using  COED  from  MENUPRM.  Modify  ASCII  input 
data  to  bring  in  new  penalty  function.  Make  run  of  HEC-PRM  for  Run2.  (Carl, 
Hurst) 

Overview  of  post-processing  using  PRMPOST  and  MATHPK  from  MENUPRM 
in  both  automatic  and  "manual"  modes.  Description  of  the  output  DSS  file  from 
MATHPK.  Brief  description  of  MATHPK  macro  files.  (Carl) 

Hands-On  post-processing.  Get  MRD  formatted  output  and  MATHPK  tabular 
output.  View  results  computed  by  MATHPK  using  DSPLAY.  Compare  results 
from  the  "base"  run  with  those  of  "Run2".  (Carl,  Hurst) 


Review  Procedures  from  yesterday.  Evaluate  and  discuss  results  of  altered  Plan. 
(Carl,  Moser,  Hayes,  Hurst) 

Break 

Operation  Rules  Development  from  HEC-PRM.  (Lund) 

Discussion  /  Conclusions  (Burnham,  et  all) 
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HEC-PRM 


Hydrologic  Engineering  Center’s  Prescriptive  Reservoir  Model 


Program  Description 


December  1991 


Hydrologic  Engineering  Center 
Water  Resources  Support  Center 
U.S.  Army  Corps  of  Engineers 
609  Second  Street 
Davis,  California  95616-4687 


(916)  756-1104 
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HEC-PRM 


Hydrologic  Engineering  Center’s  Prescriptive  Reservoir  Model 

Program  Description 

December  1991 


Overview  of  HEC-PRM  Procedures  and  Related  Programs  for  MRP 


The  overall  schematic  of  HEC-PRM  and  its  relationship  to  other 
programs  is  shown  in  Figure  24.  HEC-PRM  requires  the  use  of  HEC’s  Data 
Storage  System  (HECDSS).  HEC-PRM  must  read  the  penalty  functions,  local 
incremental  inflows,  and  evaporation  rates  from  HECDSS  data  files  —  it 
cannot  read  them  from  any  other  source.  As  a  result,  several  programs  are 
used  to  enter  and  edit  input  data  in  preparation  to  applying  HEC-PRM. 


Typical  Procedures  for  MRP 

Although  some  operations  may  be  performed  in  a  different  order,  the 
following  procedures  are  typical  for  the  MRD  study: 

(1)  Enter  regular  interval  time  series  data  in  the  HECDSS 
data  file  "MRD.DSS". 

The  regular  interval  time  series  data  consists  of  incremental  local  inflows, 
incremental  local  depletions,  and  evaporation  rates.  The  program  "RDATAO" 
reads  the  file  "DODATA”  which  is  normally  input  data  for  the  MRD  model. 
RDATAO  internally  contains  the  node  locations  and  corresponding  pathname 
parts.  Its  also  contains  the  distribution  of  evaporation.  The  file  "DODATA" 
contains  monthly  interval  inflows  and  depletions  which  are  stored  in  the 
HECDSS  data  file  using  separate  pathnames.  The  file  "DODATA"  also 
contains  yearly  evaporation  (in  feet)  at  the  six  mainstem  reservoirs.  RDATAO 
converts  these  to  monthly  regular  interval  time  series  data  using  the  internally 
stored  monthly  distribution.  In  addition,  monthly  varying  depletions,  entered 
in  the  MRD  input  data  file  "Gl",  may  be  stored  as  paired  data  using  the 
DSSPD  program. 

(2)  Compute  the  adjusted  local  incremental  inflow  using 
MATHPK  by  adding  inflows  and  depletions. 

MATHPK  allows  the  user  to  add,  subtract,  multiply,  divide,  etc.  hydrographs 
and  store  the  results  in  the  same  or  a  different  HECDSS  data  file. 

(3)  Enter  data  and  calculate  the  storage  and  flow  penalty 
functions  for  each  location  and  category  (water  supply, 
hydropower,  etc). 

These  calculations  were  performed  using  Lotus  123,  version  3.0.  This  step 
was  performed  by  the  Institute  for  Water  Resources,  U.S.  Army  Corps  of 
Engineers. 
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(4)  Re-format  and  relocate  penalty  functions  within  the 
Lotus'!  23  spreadsheets. 

Using  Lotus  123,  version  3.0,  an  additional  "sheet"  was  appended  to  each 
Lotusl23  file.  The  penalty  functions  were  copied  to  this  appended  sheet  and 
were  formatted  in  preparation  for  entry  into  a  HECDSS  data  file. 

The  HECDSS  pathname  and  appropriate  header  information  are  added  before 
each  penalty  function  (requiring  additional  rows  for  each  penalty  function). 
This  section  of  the  spreadsheet  is  "Print"ed  to  the  ASCII  file  "xxxxxx.PRN" 
which  corresponds  to  the  worksheet  "xxxxxx.WK3". 

(5)  Store  the  penalty  functions  in  the  HECDSS  data  file 
"PENCMP.DSS". 

The  program  "DSSPD"  reads  the  "xxxxxx.PRN"  file  from  the  Lotus  123 
spreadsheet  and  stores  the  penalty  functions  as  "Paired  Data  Convention". 
Alternatively,  the  "Store  DATAFILE"  option  of  the  PIP  program  may  be 
used. 

(6)  Convert  the  penalty  functions  into  "standard"  units 
using  MATHPK. 

Conversion  of  penalty  functions  into  "standard"  units  requires  several  types  of 
manipulations.  Storage  penalties  expressed  as  penalty  (in  millions  of  dollars) 
versus  pool  elevation  (in  feet)  must  be  converted  to  penalty  (in  thousands  of 
dollars)  versus  storage  (in  thousands  of  acre-feet).  The  MATHPK  function 
'TABLE"  facilitates  this.  Flow  penalties  expressed  as  penalty  versus  flow  (in 
thousands  of  cubic  feet  per  second)  must  be  converted  to  penalty  versus  flow 
(in  thousands  of  acre-feet  per  month).  An  average  value  of  30.5  days  per 
month  was  used  to  determine  this  factor. 

(7)  Compute  a  composite  function  for  each  month  at  each 
location. 

The  ultimate  goal  is  to  have  a  separate  pathname  for  each  composite  penalty 
function  for  each  location.  The  original  functions  were  a  mix  in  which  one 
category  (e.g.  hydropower)  has  one  function  which  applies  to  all  months  of 
the  year  whereas  another  category  (e.g.  recreation)  has  separate  functions  for 
each  month  of  the  year.  The  original  penalty  functions  which  varied  by 
month  were  stored  using  one  pathname.  The  final  "edited"  penalty  functions 
(those  which  the  model  uses  for  computations)  must  be  stored  in  a  separate 
pathname  for  each  month  for  each  location.  This  step  created  the  "computed 
composite"  function  by  adding  functions  for  all  categories  for  a  given  link. 

For  example,  to  compute  the  June  composite  reservoir  storage  penalty 
function,  the  analyst  must  add  the  single  hydropower  capacity  storage 
function,  the  June  pool  recreation  function,  and  the  June  water  supply  function 
and  store  the  result  in  the  HECDSS  data  file. 

(8)  Estimate  the  convex  "edited  composite"  penalty 
function  from  the  "computed  composite"  penalty 
function. 

Estimating  the  "edited  composite"  (or  "model")  penalty  function  accomplishes 
two  goals:  (1)  Forming  a  convex  function,  and  (2)  Reducing  the  number  of 
arcs  describing  the  functions.  The  "computed  composite"  function  contains 
many  ordinates.  The  analyst  must  determine  the  simplest  "edited"  function 
that  still  adequately  describes  the  "computed"  function  while  remaining 


December  1991 


F  -  99 


HEC-PRM  User’s  Manual 


convex.  The  HECDSS-DSPLAY  program  is  invoiced  to  plot  the  "computed 
composite"  function.  The  analyst  then  issues  the  "ED.D"  command  to  add  the 
additional  simple  "edited"  function  and  save  it  in  the  HECDSS  data  file 
"PENCMP.DSS"  with  an  appropriate  unique  pathname. 

(9)  Store  Pertinent  Paired  Data  Functions  in  The  File 
PENCMP.DSS 

Other  paired  data  needs  to  be  entered  in  the  PENCMP.DSS  DSS  data  file. 

This  includes  hydropower  coefficients  (A,  B,  and  capacity),  and  duration 
analysis  function  (class  intervals).  Hydropower  functions  are  entered  using 
DSSPD  and  class  intervals  may  be  entered  with  DSSPD  or  computed  and 
stored  using  MATHPK. 

(10)  Prepare  HEC-PRM  input  data  specifications. 

The  analyst  invokes  an  editor  (such  as  COED)  to  create  and  enter  information 
pertinent  to  the  HEC-PRM  program.  This  is  an  ASCII  file  which  contains 
some  miscellaneous  parameters  such  as  the  time  window  associated  with  the 
calculations,  the  HECDSS  pathname  parts  under  which  the  computed  results 
are  stored,  factors  which  are  applied  against  flow  and  penalty  data,  etc.  The 
primary  content  of  this  file  is  a  list  of  nodes  and  a  list  of  links  with  associated 
information  such  as  the  connected  nodes,  the  pathname  parts  for  the  penalty 
functions  and  the  regular  time  series  data  (inflow  and  evaporation),  upper  and 
lower  bounds,  etc. 

(11)  Perform  the  network  flow  optimization. 

To  optimize  the  network,  HEC-PRM  reads  the  ASCII  data  specifications  file, 
retrieves  the  appropriate  time  series  data  from  the  file  "MRD.DSS",  retrieves 
the  appropriate  "edited  composite"  penalty  functions  from  the  file 
"PENCMP.DSS",  generates  the  network  flow  solver  matrix,  calls  the  solver, 
and  stores  the  time  series  results  in  the  output  HECDSS  data  file. 

(12)  Display  results  graphically  or  tabularly. 

The  analyst  may  use  the  HECDSS-DSPLAY  program  to  plot  or  tabulate  the 
time  series  results.  These  include  reservoir  storage,  reservoir  releases,  and 
channel  flows.  All  flow  and  storage  data  is  expressed  in  units  of  thousands  of 
acre-feet.  The  MATHPK  program  may  be  used  to  convert  these  into  other 
units  such  as  pool  storage  in  terms  of  elevation  in  fee'  or  flow  in  terms  of 
thousands  of  cubic  feet  per  second.  Extensive  MATHPK  macros  are  written 
to  compute  hydropower,  duration  functions,  time  series  penalties,  etc. 

(13)  Review  the  solver  Matrix. 

Figure  24  also  depicts  HEC-PRM  writing  output  data  to  an  ASCF  file.  It 
contains  an  echo  of  the  user  input  including  pathnames,  warning  messages, 
and  a  list  of  the  solver  matrix  both  before  and  after  solution.  While  some  of 
the  information  is  useful,  it  is  very  painfull  to  look  at  the  solver  matrix  and 
should  be  done  only  for  short  optimizations  (a  limited  number  of  arcs). 

Usefiill  output  is  created  using  the  HECDSS-DSPLAY  program  and  possibly 
MATHPK.  These  are  both  generalized  programs  which  represent  2  of  th- 
many  HECDSS  utility  programs.  HECDSS-DSPLAY  facilitates  the  output  oi 
graphs  in  the  standard  HECDSS  graphics  format  and  includes  the  capability  of 
creating  graphics  metafiles  which  may  be  imported  to  other  software  packages 
such  as  word  processors  ;tnd  drawing  programs. 
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General  Description  of  HEC-PRM  Software 


HEC-PRM  consists  of  about  40  program  specific  subroutines  of  which  8  are 
the  generalized  solver.  It  also  utilizes  many  routines  from  HhC’s  software 
library  including  HECDSS  routines.  HEC-PRM’s  routines  do  the  following: 

assign  disk  files, 
read  user  defined  input, 
print  user  input. 

read  all  penalty  functions  (storage  and  flow)  and  all  time  series  data 

(evaporation  and  inflow)  from  input  HECDSS  data  files. 

generate  the  solver  matrix. 

print  the  matrix. 

call  the  solver  routines. 

print  the  computed  solver  matrix. 

store  the  results  in  an  output  DSS  data  file. 

close  all  disk  files. 


Structure  of  HEC-PRM 

The  internal  flow  of  information  within  HEC-PRM  is  shown  in  Figure  25. 
HEC-PRM  retrieves  input  data  from  three  sources: 

(1)  An  ASCH  data  specifications  file, 

(2)  An  HECDSS  data  file  containing  penalty  functions,  and 

(3)  An  HECDSS  data  file  containing  regular  interval  time  series  data. 

The  input  data  relationships  are  shown  in  Figure  24.  HEC-PRM  reads  the 
ASCII  data  specifications  file  first  It  defines  many  miscellaneous  parameters 
such  as  the  computational  time  window,  the  nodes,  and  the  links.  HEC-PRM 
stores  the  number  of  nodes  and  links  as  well  as  associated  information  such  as 
the  nodes  which  are  connected  by  each  link  and  the  pathnames  which  define 
the  storage  location  within  the  HECDSS  data  files  for  the  penalty  functions, 
inflows,  and  evaporation  rates.  It  then  generates  the  solver  matrix  which 
consists  of  arcs  each  of  which  is  defined  by  the  following  the  parameters: 

(1)  Source  node, 

(2)  Target  node, 

(3)  Lower  bound, 

(4)  Upper  bound, 

(5)  Unit  cost, 

(6)  Amplitude  (for  the  gains  solver),  and 

(7)  Flow  (initialized  to  zero). 

There  are  several  other  scalar  parameters  that  must  also  be  set.  HEC-PRM 
builds  this  matrix  by  generating  1  or  more  "special”  arcs  and  then  processing 
each  link  in  the  same  sequence  in  which  they  were  entered  by  the  user.  The 
first  arc  is  always  the  arc  between  the  super  source  and  the  super  sink.  The 
second  through  NRES+1  arcs  contain  the  starting  storage  for  each  reservoir 
where  "NRES"  is  the  number  of  reservoirs.  The  subsequent  arcs  are 
dependent  upon  the  order  and  type  of  links  entered  by  the  user.  When 
appropriate,  data  is  retrieved  from  HECDSS  data  files.  For  example,  the 
inflow  links  icquire  the  retrieval  of  local  incremental  adjusted  inflow,  storage 
links  require  the  retrieval  of  evaporation  rates  and  storage  penalty  functions, 
etc. 

If  the  user  has  defined  constraints  for  a  given  link,  the  lower  and  upper 
bounds  on  the  arcs  are  set  accordingly.  The  number  of  arcs  associated  with  a 
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Figure  26:  Internal  Processes  of  HECPRM 
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given  link  for  a  given  month  is  exactly  the  same  as  the  number  of  line 
segments  in  the  penalty  function.  All  inflow  arcs  have  one  arc  per  time 
period  and  have  lower  and  upper  bounds  which  vary  for  every  time  period 
and  are  set  to  the  local  inflow  with  a  unit  cost  of  zero.  Once  the  solver 
matrix  is  filled  and  appropriate  parameters  are  set  (such  as  the  number  of 
arcs,  the  number  of  nodes,  and  the  total  system  inflow),  HEC-PRM  calls  the 
network  flow  with  gains  solver.  HEC-PRM  tracks  the  progress  of  solution  by 
displaying  on  the  computer  screen  the  number  of  iterations  and  the  computed 
total  flow.  The  solver  continues  to  iterate  until  a  least  cost  solution  is 
determined.  The  typical  application  contains  many  unknowns  with  far  fewer 
equations.  Therefore,  there  can  be  many  solutions  to  the  problem.  Minor 
changes  to  input  data  can  cause  the  solver  to  compute  an  entirely  different 
solution. 

Once  the  solution  is  determined,  the  solver  fills  the  "FLOW"  array  with 
the  computed  flow  in  each  arc  of  the  matrix.  HEC-PRM  can  then  "post- 
process"  this  information  by  adding  the  flow  in  all  arcs  for  each  time  period 
and  storing  monthly  regular  interval  time  series  data  in  the  output  HECDSS 
data  file.  The  output  monthly  time  series  data  includes  not  only  flow  and 
storage  but  also  the  total  cost  by  month  for  each  link.  The  total  cost  is 
computed  using  the  "edited  composite  convex"  penalty  function  defined  by  the 
user  and  retrieved  by  HEC-PRM  from  the  HECDSS  data  file 
"PENCMP.DSS  ". 

Presently,  HEC-PRM  also  generates  an  integer  matrix  which  is  written  to 
the  file  "SUPERK.SK".  This  matrix  is  formated  so  that  it  can  be  retrieved  by 
an  alternative  solver  "SUPERK”  which  does  not  contain  any  "gains"  capability 
and  is  therefore  not  appropriate  for  the  MRD  study.  Also,  at  this  time,  HEC- 
PRM  cannot  post-process  the  SUPERK  matrix  and  store  the  results  in  an 
HECDSS  data  file. 

HEC-PRM  can  also  generate  data  for  use  with  the  NETG  solver  (a 
commercially  available  solver).  The  results  from  this  solver  are  post- 
processed  outside  of  the  HEC-PRM  program. 


Executing  HEC-PRM 


HEC-PRM  requires  the  use  of  the  HECDSS  software.  All  input  penalty 
functions  are  read  from  one  DSS  data  file,  all  time  series  input  data  is  read 
from  another  DSS  data  file,  and  the  "understandable"  results  are  written  to  a 
third  HECDSS  data  file.  The  files  may  be  defined  using  "MENUPRM". 
Alternatively,  these  data  files  may  be  defined  at  the  DOS  prompt  which 
executes  HEC-PRM  as  shown  below: 

HECPRM:  Prescriptive  Reservoir  Model  -  Vers.  December  1,  1991 


UNIT 

KEYWORD 

♦ABREV 

♦♦MAX 

DEFAULT 

5 

INPUT 

I 

64 

CON 

6 

OUTPUT 

O 

64 

CON 

95 

F95 

F 

64 

SCRATCH. 03 5 

NOP 

TS  DSS  IN 

T 

64 

SCRATCH. 031 

NOP 

PF  DSS  IN 

P 

64 

SCRATCH. 032 

NOP 

DSSOUT 

D 

64 

SCRATCH. 033 

1 

MSG 

M 

64 

HECPRM.  ERP. 

29 

TPACE 

TP. 

64 

SCRATCH. 009 

*  ABREV  -  SHORTEST  ABBREVIATION  ALLOWED  FOR  KEYWORD 
**  MAX  -  MAXIMUM  #  OF  CHARACTERS  FOR  FILENAME  (OR  STRING) 


To  execute  the  program,  you  must  enter  the  program  name  followed  by  the 
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appropriate  file  names.  Use  the  "*ABREV"  codes  to  define  the  file  type. 

The  following  files  should  be  defined:  INPUT,  OUTPUT,  TS_DSS_IN, 
PF_DSS_IN,  and  DSSOUT.  The  file  "HECPRM.ERR"  contains  error 
messages.  It  is  supplied  with  the  program  and  you  should  copy  it  into  your 
local  subdirectory  (where  the  data  is  located).  An  example  command  to 
execute  HEC-PRM  is  as  follows: 

HECPRM  1=15 YOD . PRI  O=I5Y0D.PRO  T=MRD.DSS  P=PENCMP.DSS  D=I5Y0D.DSS 

The  corresponding  files  are: 

INPUT  I5Y0D.PRI 

User  input  data  which  defines  many  items  including 
the  time  window,  the  nodes,  the  links,  the  pathname 
parts  for  the  penalty  functions,  the  pathname  parts 
for  the  time  series  data,  etc. 

OUTPUT  I5YOD.PRO 

The  tabular  output  from  the  program  including  a 
listing  of  the  user  input  (file  I5Y0D.PRI)  and  a 
listing  of  the  solver  matrix  before  and  after  the 
solution. 

TS_DSS_EN  MRD.DSS 

The  HECDSS  data  file  which  contains  all  input 
time  series  data  including  the  rate  of  evaporation 
(EV  records)  and  incremental  inflows  (IN  records). 

PF_DSS_IN  PENCMP.DSS 

The  HECDSS  data  file  which  contains  all  input 
penalty  functions  including  flow  (PQ  records)  and 
reservoir  storage  (PS  records). 

DSSOUT  I5Y0D.DSS 

The  HECDSS  data  file  which  contains  all  computed 
time  series  data.  The  local  inflows  are  also  written 
to  this  file. 


Data  Units 


All  flow  data  are  entered  in  thousands  of  acre-feet  (KAF).  All  penalties  are 
entered  in  thousands  of  dollars  (K$).  All  evaporation  rates  are  entered  in  feet 
per  month  (FT).  The  data  may  be  entered  in  other  units  (e.g.  penalties  in 
thousands  of  dollars).  However,  all  flow  and  storage  must  be  entered  in 
consistent  units  (KAF)  for  both  the  time  series  data  as  well  as  penalty 
functions.  All  penalties  must  be  in  consistent  units  (K$).  You  may  enter 
factors  on  the  J1  record  to  change  the  magnitude  of  the  data  for  the  solver. 
For  example,  all  unit  costs  in  thousands  of  dollars  could  be  multiplied  by 
0.001  so  that  the  solver  would  use  unit  costs  in  millions  of  dollars. 
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Format  of  HECDSS  data 


The  HECDSS  software  has  several  standard  data  conventions.  These  are 
useful  because  many  programs  recognize  these  conventions  and  can  easily 
manipulate  and  display  data  which  meets  these  standard  conventions.  Time 
series  data  is  stored  using  the  regular  interval  time  series  data  convention. 
Penalty  functions  are  stored  using  the  paired  function  data  convention. 

For  the  MRD  study,  two  programs  were  developed  to  read  data  from  ASCII 
files  supplied  by  MRD.  One  program  reads  the  standard  monthly  flow  data 
files  and  stores  the  data  in  a  HECDSS  data  file.  The  other  program  reads 
output  from  the  "Vl.EXE"  program  and  reformats  it  so  that  the  program 
HECDSS-DSSRTS  can  be  used  to  store  it  in  a  HECDSS  data  file. 

Penalty  functions  and  rating  curves  may  be  entered  with  the  standard 
programs  HECDSS-PIP  or  HECDSS-DSSPD.  For  the  MRD  study,  this  data 
was  entered  in  Lotus  spreadsheets,  appropriate  additional  information  was 
added,  and  a  Lotus  ".PRN"  file  was  created.  This  ”.PRN"  file  is  compatible 
with  the  input  file  used  by  the  HECDSS-DSSPD  program.  The  HECDSS- 
DSSPD  can  be  used  to  read  this  file  and  store  it  in  a  HECDSS  data  file.  All 
penalty  functions  are  defined  with  the  storage  (or  flow  or  elevation)  variable 
first  and  the  penalty  variable  second.  The  HECDSS-MATHPK  program  is 
used  to  convert  penalty  functions  into  proper  units  (e.g.  convert  elevation  to 
storage  or  convert  flow  in  CFS  to  volume  in  KAF/MONTH). 


Order  of  User  input 


The  records  described  on  the  following  pages  should  be  entered  in  the 
following  order. 

First  All  job  control  records  such  as  "TIME",  "Jl”,  "IDENT",  and 


Second  All  node  identifier  records  ("NODE"). 

Third  All  link  definition  records  including  "LINK”,  "BL",  "BU", 

"PS”,  "PQ”,  "EV",  and  "IN".  The  "LINK"  record  is  the  first 
record  of  each  link.  There  is  one  "LINK”  record  for  each 
link  in  the  network.  All  other  "LINK"  records  which  are 
required  to  define  that  link  follow  the  "LINK"  record. 

Comment  records  ("..",  or  ”  ")  may  be  entered  anywhere  in  the  input 
data  stream. 


Note: 


In  the  following  description,  the  character  "  b "  indicates  a  blank  character. 


HEC-PRM  User’,  Manual 


F  -  106 


December  1991 


Comment  Records  (..  **  ) 


Columns  Variable  Value 


Description 


1-2  CINREC  ..  Comment  Record.  Columns  3-n  are  printed  in  output  This 

record  may  be  entered  anywhere  within  the  input  data  stream. 
There  is  no  limit  to  the  number  of  comment  records. 


** 


Columns  Variable  Value  Description 


1-2  CINREC  **  Comment  Record.  Columns  3-n  are  printed  in  output  This 

record  may  be  entered  anywhere  within  the  input  data  stream. 
There  is  no  limit  to  the  number  of  comment  records. 


bb 


Columns 

Variable 

^ata^ 

Description 

1-2 

CINREC 

|W-*| 

Comment  Record.  Columns  3-n  are  printed  in  output  This 

record  may  be  entered  anywhere  within  the  input  data  stream. 
There  is  no  limit  to  the  number  of  comment  records. 
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IDENT,  TIME 


IDENT 

Columns 

1-5 

11-20 

21-30 

TIME 

Columns 


11-80 


Variable  Value 
CINREC  IDENT 

IDNODE(l)  cb«« 

IDNODE(2) 


Description 


This  record  contains  the  code  names  for  the  Super  Source  and 
Super  Sink  nodes.  It  is  an  optional  record.  If  you  wish  to  use 
the  default  code  names  of  "S_SOURCE"  and  "S_SINK",  you 
need  not  enter  this  record.  If  entered,  it  must  precede  all  other 
records  which  reference  these  nodes  such  as  the  "NODE 
and  "LINK"  records. 

The  character  identification  for  the  Super  Source  node.  Default 
is  "S_SOURCE".  (Maximum  10  characters) 

The  character  identification  for  the  Super  Sink  node.  Default  is 
"S_SINK".  (Maximum  10  characters) 


Variable  Value  Description 


CINREC  TIME  This  record  contains  the  time  window  for  which  calculations  are 

performed.  It  is  a  required  record. 

CINREC  character  Contains  the  time  window  in  free-foimat.  There  must  be  a 

starting  date  and  ending  date.  The  starting  date  must  be  entered 
first  followed  by  the  ending  date.  The  date  consists  of  the  3 
character  month  and  the  integer  year  without  any  space 
separating  them.  The  day  is  not  entered  as  part  of  the  time 
window  since  all  computations  are  done  on  a  monthly  time 
interval.  The  year  may  be  either  2  or  4  digit  year  (the  2  digit 
year  is  assumed  to  be  within  the  years  1900-1999).  An  example 
entry  is: 


TI  JAN1930  DEC1940 

Internally,  the  computation  time  window  is  stored  in  variables: 

YRWIN(2)  Year 

MONWlN(2)  Month 
DAYW1N(2)  Day 
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J1 

Columns 

1-2 

3-10 

11-20 

21-30 

31-40 


J1 


Variable  Value 


CINREC  J1 


EPS  *  Ml  DO. 


BIG 


FACFLO  blnk.  +  ml  Do. 


FACCST  blank.  +  mol 


Description 


This  record  contains  specifications  for  this  simulatioa  The 
specifications  include  network  solver  constants,  function  factors, 
and  data  units. 

EPS  is  a  small  positive  number  which  is  used  by  the  Jensen- 
Bhaumik  "Network  with  Gains"  Solver.  HEC-PRM  uses  EPS  to 
test  for  iteration  convergence  and  to  determine  the  least  cost 
flow  path.  (Default  is  1 .0E-05;  Must  be  a  positive  number). 

BIG  is  a  large  positive  number  which  is  used  by  the  Jensen- 
Bames  "Network  with  Gains"  Solver.  HEC-PRM  uses  BIG  in 
several  areas  including  the  upper  flow  bound  for  links  which 
have  no  specific  physical  boundary.  An  example  is  a  channel 
link  between  two  nodes.  (Default  is  +1.0E+06;  Must  be  a 
positive  number). 

FACFLO  scales  all  incremental  inflows  for  calculations  by  the 
network  solver.  HEC-PRM  multiples  all  inflows  by  FACFLO 
before  calling  the  solver  and  then  divides  the  computed  flows 
by  FACFLO  after  the  solution  and  before  storing  results  in  the 
output  DSS  datafile.  (Default  is  1.0;  Must  be  a  positive 
number). 

FACCST  scales  all  unit  costs  which  are  derived  from  the 
penalty  functions.  The  scaled  costs  are  used  by  the  network 
solver.  Each  arc  contains  a  unit  cost.  HEC-PRM  multiples  all 
unit  costs  by  FACCST  before  calling  the  solver  and  then 
divides  the  unit  costs  by  FACCST  after  the  solution  and  before 
storing  cost  time  series  data  in  the  output  DSS  datafile. 

(Default  is  1.0;  Must  be  a  positive  number). 
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CENREC 


ZW 


This  record  contains  die  character  identification  for  pathname 
part  F  of  the  results  for  this  simulatioa 


3-80 


SIMLID  chm..  SIMLID  is  the  portion  of  pathname  part  F  which  is  used  to 

identify  this  simulation.  It  is  used  to  store  results  under 
separate  DSS  records  for  different  simulations  (e.g.  to 
differentiate  results  after  changing  penalty  functions  between 
simulations).  HEC-PRM  uses  STMT  .ID  to  form  pathname  part 
F.  (Maximum  of  20  characters;  recommend  using  less). 
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NODE 


NODEt  t>  b  b 

Columns 

1-8 

11-20 

21-30 

31-40 

41-50 


Variable  Value 


Description 


CINREC  NODEbbbb 


IDNODE 


RSTO 1  blank.  ♦  real  no. 


RSTOK  blank.  ♦  real 


These  records  contain  the  identification  code  for  each  node  and 
the  associated  character  description.  These  are  required  records. 
All  "NODE  "  records  must  be  entered  before  entering  any 
"LINK"  records.  There  must  be  one  "NODE  "  record  for 
each  node  in  the  network.  HEC-PRM  automatically  defines  the 
first  two  nodes  to  be  the  Super  Source  and  the  Super  Sink.  You 
may  optionally  define  the  Super  Source  and  Sink  on 
"NODE  "  records.  If  you  include  the  "IDENT"  record,  it 
must  precede  the  "NODE  ”  records. 

The  code  identifier  for  this  node.  This  node  identifier  is  used 
on  the  "LINK"  records  to  define  the  network.  Each  IDNODE 
must  be  unique  for  this  input  data  set. 

The  initial  storage  at  the  beginning  of  the  simulation  for  this 
node  if  it  is  a  reservoir.  If  this  node  is  not  a  reservoir,  leave 
this  field  blank.  HEC-PRM  defines  this  node  as  a  reservoir  if 
this  field  is  non-blank.  RSTOl  is  entered  in  thousands  of  acre- 
feet.  (Default  is  blank;  if  reservoir,  must  be  a  positive  real 
number). 

The  factor  for  converting  reservoir  capacity  into  area  for  use  in 
computing  evaporation.  It  is  computed  by  estimating  a 
representative  slope  of  the  area-capacity  curve.  The  numerator 
is  the  change  in  area  (in  thousands  of  acres)  and  the 
denominator  is  the  change  in  volume  (in  thousands  of  acre-feet). 
(Default  is  0.1;  Must  be  zero  or  a  positive  real  number). 


RSTOT 


blank,  ♦  ical  no. 


The  target  reservoir  storage  for  the  last  time  period  of  the 
optimization.  Enter  RSTOT  only  for  reservoirs. 
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NODE 


LINK 

Columns 

1-4 

11-20 


21-30 

31-40 

41-50 

51-60 

61-70 


Variable  Value  Description 


CINREC  LINK  These  records  contain  the  information  for  the  links  between 

nodes.  They  are  required  records.  HEC-PRM  defines  the 
overflow  arc  between  the  Super  Source  and  the  Super  Sink  to 
be  the  first  arc  in  the  network.  You  need  not  enter  a  "LINK'’ 
record  to  define  this  arc  but  you  may.  The  typical  reason  why 
you  might  alter  this  link  is  to  specify  the  unit  cost. 


LINKTY  duncMr  The  type  of  link.  (No  default,  the  user  must  enter  a  value). 

Must  match  one  of  the  following  codes: 


Code 

Description 

CHAN 

Channel  link. 

DIVR 

Diversion  link  (includes  link  from  the  Super 
Source  to  the  Super  Sink  and  the  link  from  the 
last  node  to  the  Super  Sink). 

INFL 

Inflow  link. 

RREL 

Reservoir  release  link. 

RSTO 

Reservoir  storage  link. 

HREL 

Hydropower  release  link. 

LIFROM  dbmcttr 


LINKTO 


LLAMP 

LICOST 


LILOWR 


The  node  identification  from  which  flow  travels  through  this 
link.  It  must  match  one  of  the  identifiers  entered  on  the 
"NODE"  records  or  the  Super  Source  or  the  Super  Sink.  (No 
default,  user  must  enter  node  identifier  in  this  field;  Maximum 
of  10  characters) 

The  node  identification  to  which  flow  travels  through  tlris  link. 
It  must  match  one  of  the  identifiers  entered  on  the  "NODE" 
records  or  the  Super  Source  or  the  Super  Sink.  (No  default, 
user  must  enter  node  identifier  in  this  field;  Maximum  of  10 
characters) 

The  amplitude  to  be  used  for  this  link.  If  left  blank,  it  is  set  to 
”1.0".  (Default  is  "1.0";  Must  be  a  positive  number) 

The  constant  cost  for  all  time  periods  for  this  link.  This  field  is 
normally  left  blank.  If  a  number  is  entered  here,  do  not  enter 
penalty  functions.  (Default  is  "0.0";  May  be  positive,  negative, 
or  zero) 

The  lower  bound  for  this  link.  This  is  the  lowest  allowable 
value  of  volume  (flow  /  storage)  in  the  penalty  function  for 
which  the  algorithm  will  solve.  This  is  normally  left  blank. 
Care  must  be  exercised  in  using  bounds  because  the  algorithm 
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LINK 


will  abort  if  it  cannot  determine  a  feasible  solution.  (Default  is 
"0.0";  Must  be  zero  or  a  positive  number) 


LINK  (continued) 

Columns 

Variable 

Description 

71-80 

LIUPPR 

+  imI  no. 

The  upper  bound  for  this  link.  This  is  the  highest  allowable 

value  of  volume  (flow  /  storage)  in  the  penalty  function  for 
which  the  algorithm  will  solve.  This  is  normally  left  blank. 
Care  must  be  exercised  in  using  bounds  because  the  algorithm 
will  abort  if  it  cannot  determine  a  feasible  solution.  (Default  is 
to  set  LIUPPR  equal  to  parameter  "BIG";  Must  be  positive 
number) 


LD 

Columns 

Variable 

Value 

Description 

1-8 

CINREC 

LD 

This  record  contains  the  description  for  the  current  link  defined 
on  the  "LINK"  record.  It  is  an  optional  record. 

11-n 

LIDESC 

chmonr 

The  character  description  for  this  node.  It  can  be  any  textual 
information. 
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BL 

Columns 

1-2 

3-n 

BU 

Columns 

1-2 

3-n 


HUC'-PRM 


Variable  Value 

CINREC  BL 


LILOWR 


O,  tnloo. 


Description 


This  record  contains  information  about  the  lower  bounds  of  the 
penalty  function.  If  the  lower  bound  remains  constant 
throughout  the  simulation,  it  is  entered  on  the  “LINK"  record 
If  it  follows  a  monthly  pattern  (all  January  bounds  are  the  same, 
all  February  bounds  are  the  same  but  different  than  January, 
etc.),  then  it  must  be  entered  on  this  record. 

The  monthly  varying  lower  bounds  is  entered  in  free-format. 
Twelve  values  must  be  entered.  The  first  value  corresponds  to 
January.  If  you  enter  adjacent  commas,  the  corresponding  value 
is  defined  by  the  value  entered  on  the  LINK  record. 


Variable  Value 

CINREC  BU 


LIUPPR  0,  +  mI  no. 


Description 


This  record  contains  information  about  the  upper  bounds  of  the 
penalty  function.  If  the  upper  bound  remains  constant 
throughout  the  simulation,  it  is  entered  on  the  "LINK"  record 
If  it  follows  a  monthly  pattern  (all  January  bounds  are  the  same, 
all  February  bounds  are  the  same  but  different  than  January, 
etc.),  then  it  must  be  entered  on  this  record. 

The  monthly  varying  upper  bounds  is  entered  in  free-format. 
Twelve  values  must  be  entered.  The  first  value  corresponds  to 
January.  If  you  enter  adjacent  commas,  the  corresponding  value 
is  defined  by  the  value  entered  on  the  LINK  record. 
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EV 


EV 


Columns 

Variable 

Value 

Description 

1-2 

CINREC 

EV 

This  record  contains  HECDSS  pathname  parts  and  instructs  the 
HEC-PRM  to  read  time  series  data  for  evaporation.  The 
evaporation  should  be  expressed  as  a  rate  per  month  in  feet. 
This  record  must  be  entered  only  for  Reservoir  Storage 
("RSTO")  links. 

3-N 

CINREC 

character 

The  pathname  parts  are  entered  in  free-format.  The  pathname 
part  is  preceded  by  an  equal  "="  sign  which  is  preceded  by  the 

part  identifier  (A  through  F). 

Parts  D  and  E  are  assumed.  Part  E  is  the  time  interval 
(1MON),  and  part  D  is  the  standard  block  time  for  regular 
interval  time  series  data.  Part  D  is  generated  from  the  time 
window  entered  on  the  "TIME"  record. 

If  part  C  is  not  entered,  the  HEC-PRM  assumes  it  will  be 
"EVAP_RATE". 

If  a  part  is  blank,  enter  the  part  identifier,  the  equal  sign,  and  at 
least  one  blank.  The  HEC-PRM  remembers  time  series  parts 
from  the  last  entry  (either  "IN"  or  "EV"  records)  —  you  need 
only  update  necessary  parts. 

Example  entry: 

EV  B=FTPK 
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IN 

IN 


Columns 

^ariabj^ 

Value 

Description 

1-2 

CINREC 

IN 

This  record  contains  HECDSS  pathname  parts  and  instructs  the 
HEC-PRM  to  read  time  series  data  for  inflow.  The  flow  should 

be  expressed  as  a  volume  per  month  in  1,000  Acre-Feet  This 
record  may  be  entered  for  any  inflow  link. 

3-N 

CINREC 

character 

The  pathname  parts  are  entered  in  free-format.  The  pathname 

part  is  preceded  by  an  equal  "="  sign  which  is  preceded  by  the 
part  identifier  (A  through  F). 


Parts  D  and  E  are  assumed.  Part  E  is  the  time  interval 
(1MON).  and  part  D  is  the  standard  block  time  for  regular 
interval  time  series  data.  Part  D  is  generated  from  the  time 
window  entered  on  the  "TIME”  record. 


If  part  C  is  not  entered,  the  HEC-PRM  assumes  it  will  be 
"FLOW*. 

If  a  part  is  blank,  enter  the  part  identifier,  the  equal  sign,  and  at 
least  one  blank.  The  HEC-PRM  remembers  time  series  parts 
from  the  last  entry  (either  "IN”  or  "EV"  records)  —  you  need 
only  update  necessary  parts. 

Example  entry: 

IN  A=  B=FTPK  F= 
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PS 


PS 


Columns  Variable  Value  Description 


1-2  CINREC  PS  This  record  contains  HECDSS  pathname  parts  and  instructs  the 

HEC-PRM  to  read  paired  function  reservoir  storage  penalty 
functions  from  the  HECDSS  data  file.  The  penalty  should  be 
expressed  in  thousands  of  dollars  and  the  storage  in  1,000  Acre- 
Feet.  It  also  identifies  the  month  or  range  of  months  that  this 
penalty  function  is  applicable.  There  can  be  a  separate  penalty 
function  for  each  of  the  months  within  a  year.  The  penalty 
function  cannot  vary  from  year-to-year.  The  first  penalty 
function  must  be  for  January  or  for  a  range  of  consecutive 
months  starting  in  January.  The  functions  must  be  in 
chronological  order  (e.g.  you  cannot  enter  the  August  function 
before  the  July  function).  You  must  define  a  function  for  each 
month. 

3-N  CINREC  chmcc.  The  pathname  parts  are  entered  in  free- form  at.  The  pathname 

part  is  preceded  by  an  equal  "="  sign  which  is  preceded  by  the 
part  identifier  (A  through  F). 

The  months  are  entered  in  free-format  using  the  3  character 
month  identifier  (e.g.  "FEB").  If  the  penalty  function  spans  2  or 
more  consecutive  months,  the  starting  and  ending  months  must 
be  separated  by  the  "-"  (dash)  character.  Similar  to  the 
pathname  parts,  the  months  are  preceded  by  an  "="  (equal)  sign 
which  is  preceded  by  the  characters  "MO". 

If  part  C  is  not  entered,  the  HEC-PRM  assumes  it  will  be 
"STOR-PNLTY_EDT”. 

If  a  part  is  blank,  enter  the  part  identifier,  the  equal  sign,  and  at 
least  one  blank.  The  HEC-PRM  remembers  paired  function 
parts  from  the  last  entry  (either  "PS"  or  ”PQ"  records)  —  you 
need  only  update  necessary  parts. 

Example  entries: 

PS  mo=jan-mar  b=ftpk  e=jan 

PS  MO=JUL  B=GARR  E=JTJL 
PS  MO=JAN-DEC  B=OAHE 
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PQ 


Columns 

^Variabl^ 

Value 

Description 

1-2 

CINREC 

PQ 

This  record  contains  HECDSS  pathname  parts  and  instructs  the 

HEC-PRM  to  read  paired  function  flow  penalty  functions  from 
the  HECDSS  data  file.  This  record  is  used  with  the  following 
types  of  LINK  records:  CHAN,  RREL,  HREL,  and  DIVR. 


The  penalty  should  be  expressed  in  thousands  of  dollars  and  the 
flow  in  1,000  Acre-Feet  It  also  identifies  the  month  or  range 
of  months  for  which  this  penalty  function  is  applicable.  There 
can  be  a  separate  penalty  function  for  each  of  the  months  within 
a  year.  The  penalty  function  cannot  vary  from  year-to-year. 

The  first  penalty  function  must  be  for  January  or  for  a  range  of 
consecutive  months  starting  in  January.  The  functions  must  be 
in  chronological  order  (e.g.  you  cannot  enter  the  August 
function  before  the  July  function).  You  must  define  a  function 
for  each  month. 

3-N  CINREC  dm,  The  pathname  parts  are  entered  in  free-format.  The  pathname 

part  is  preceded  by  an  equal  "="  sign  which  is  preceded  by  the 
part  identifier  (A  through  F). 

The  months  are  entered  in  free-format  using  the  3  character 
month  identifier  (e.g.  "FEB").  If  the  penalty  function  spans  2  or 
more  consecutive  months,  the  starting  and  ending  months  must 
be  separated  by  the  (dash)  character.  Similar  to  the 
pathname  parts,  the  months  are  preceded  by  an  "="  (equal)  sign 
which  is  preceded  by  the  characters  "MO". 

If  part  C  is  not  entered,  the  HEC-PRM  assumes  it  will  be 
"FLOW-PNLTYJEDT". 

If  a  part  is  blank,  enter  the  part  identifier,  the  equal  sign,  and  at 
least  one  blank.  The  HEC-PRM  remembers  paired  function 
parts  from  the  last  entry  (either  "PS"  or  "PQ"  records)  —  you 
need  only  update  necessary  parts. 

Example  entries: 

PQ  MO=JAN-MAR  A=  B=FTPK-GARR  E=JAN  F= 

PQ  MO= JUL  B=GARR - OAHE  E=JUL 
PQ  MO=JAN-DEC  B=OAHE-BEND 

PQ  MO=JAH  B=FTPK-GARR  C=FLOW-PNLTY  HPE  EDT 
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Terminate  Input 


Terminate  Input  -  Introduction 

Any  one  of  the  following  commands  may  be  entered.  If  more  than  one  command  is  entered,  only  the  first  is 
observed.  The  entry  of  one  of  these  commands  instructs  HEC-PRM  to  terminate  reading  user  input,  generate  the 
network  matrix,  call  the  solver,  and  store  the  results  in  the  output  DSS  data  file. 


STOP 


Columns 

J/ariabl^ 

Value 

Description 

1-4 

CINREC 

STOP 

Terminate  user  input  and  commence  generating  and  solving  the 

network. 


FINISH 

Columns 

Variable 

Value 

Description 

1-4 

CINREC 

STOP 

Terminate  user  input  and  commence  generating  and  solving  the 
network. 

QUIT 

Columns 

Variable 

Value 

Description 

1-4 

CINREC 

STOP 

Terminate  user  input  and  commence  generating  and  solving  the 
network. 
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HEC-PRM 

Hydrologic  Engineering  Center’s  Prescriptive  Reservoir  Model 

Example  User  Input  jnd  Output 

December  1991 


The  following  lists  a  typical  HEC-PRM  output  data  set.  The  input  data  records  are  listed  as  the  first  part  of  the 
output  data.  This  particular  data  set  is  for  the  1  year  time  window  from  March  1965  through  February  1966. 

By  modifying  the  "TIME''  record,  it  could  easily  be  adapted  to  the  5  year  validation  period  or  the  23  year  critical 
period. 


{Banner  Page} 


Reservoir  System  Operation  Optimization 
Version  0.2.01;  October  1991 
IBM-PC  Compatible  (Lahey  32bit) 

Run  date  26NOV91  time  17:41:05 


HECPRM 


U.S.  Army  Corps  of  Engineers 
Hydrologic  Engineering  Center 
609  Second  Street,  Suite  B 
Davis,  California  95616 
(916)  756-1104 


{Open  DSS  files  and  echo  Input  Data} 


- DSS - ZOPEN :  Existing  File  Opened,  File:  TSIN.DSS 

Unit:  71 i  DSS  Version:  6-GO 

- DSS— ZOPEN:  Existing  File  Opened,  File:  PENCMF.DSS 

Unit:  72 $  DSS  Version:  6-GO 

- DSS - ZOPEN:  Existing  File  Opened,  File:  EXMPL1.DSS 

Unit:  73 i  DSS  Version:  6-GO 

Test  EXMPL1 
1  Year  period 
Evaporation  included 
Reservoir  bounds  included 
HEC-PRM  Picks  ending  storage 
Set  bypass  link  coat  to  zero 


ZN  F-EXMPL1 


I  DENT 

S_SOURCE  S 

SINK 

TIME 

MAR6S  FEB66 

J1  1. 

0E-05  1.0E+06 

1.0 

EPS 

BIG 

0.0000100 

1000000. 

0 . 1000000E-04  0 . 1000000E+07 

NODE 

FTPK 

13900. 

ND 

Fort  Pack 

NODE 

FTPKR 

ND 

Fort  Peck 

NODE 

GARR 

15605. 

ND 

Garrison 

NODE 

GARRR 

ND 

Garrison 

NODE 

OAHE 

17739. 

ND 

Oahe 

NODE 

OAHER 

ND 

Oahe 

NODE 

BEND 

173". 

ND 

Big  Bend 

NODE 

BENDR 

1.0E+03 

FACFLO  FACCST 

1.00000  1000.00000 

0. 1000000E+01  0 . 1000000E+04 

.011 


.013 


.012 


."21 
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HD 

Big  Bend 

NODB 

FTRA  3473.  .013 

ND 

Fort  Randall 

NODE 

FTRAR 

HD 

Fort  Randall 

NODE 

GAPT  357.  .033 

HD 

Gavins  Point 

NODE 

GAPTR 

HD 

Gavins  Point 

NODE 

SUX 

ND 

Sioux  City 

NODE 

OMA 

ND 

Omaha 

NODE 

NONE 

ND 

Nebraska  City 

NODE 

MKC 

ND 

Kansas  City 

NODE 

BNMO 

ND 

Boonville 

NODE 

HEMO 

ND 

Hermann 

NODE 

STL 

ND 

St.  Louis 

LINK 

DIVR  S  SOURCE  S  SINK 

1.0  0.0 

LD 

Link  to  balance  flow  throughout  computations 

LINK 

INFLOW  S_SOURC£  FTPK 

1.0  0.0 

LD 

Inflow  into  Fort  Peck  Reservoir 

IN 

A-  B=FTPK  C=FLOW_LOC  E=1M0N  F* 

LINK 

RSTOR  FTPK  FTPK 

4211 

LD 

Storage  in  Fort  Peck  Reservoir 

PS 

MO- JAN -MAR  A=  B=FTPK  C-STOR-PNLTY  EDT  D-  E-JAN  F« 

PS 

MO-APR-JUN  C-STOR-PNLTY  EDT  E-APR 

PS 

MO-JUL  E-JUL 

PS 

MO-AOG  E-APR 

PS 

MO-SEP  E-SEP 

PS 

MO-OCT  E-APR 

PS 

MO-NOV  E-SEP 

PS 

MO-DEC  E-DEC 

EV 

C-EVAPRATE  F= 

LINK 

HREL  FTPK  FTPKR 

LD 

Hydropower  release  from  Ft.  Peck. 

PQ 

MO-JAN-DEC  B-FTPK-GARR  C-FLOW-PMLTY_HPE_EDT  B-  F- 

LINK 

RREL  FTPKR  CARR 

LD 

Release  from  Fort  Peck  Reservoir  to 

Garrison 

PQ 

MO- JAN -MAR  B-FTPK-GARR  C-FLOW-PNLTY 

EDT  E=JAN  F= 

PQ 

MO- APR  E-APR 

PQ 

MO-MAY -JUN  E-MAY 

PQ 

MO-JUL  E-JUL 

PQ 

HO-AUG  E-AUG 

PQ 

MO-SEP  E-SEP 

PQ 

MO-OCT  E-OCT 

PQ 

MO-NOV- DEC  E-JAN 

LINK 

INFLOW  S__SOURCE  GARR 

1.0  0.0 

LD 

Inflow  into  Garrison  Reservoir 

IN 

B-GARR  F— 

LINK 

RSTOR  GARR  GARR 

4990 

LD 

Storage  in  Garrison  Reservoir 

PS 

MO- JAN -MAR  B-GARR  C-STOR-PNLTY  EDT  1 

H 

i 

PS 

MO-APR  E-APR 

PS 

MO-MAY  E-MAY 

PS 

MO- JUN  E-JUN 

PS 

MO-JUL  E-JUL 

PS 

MO-AUG  E-AUG 

PS 

MO-SEP  E-SEP 

PS 

MO-OCT  E-OCT 

PS 

MO-NOV  E-NOV 

PS 

MO-DEC  E-JAN 

EV 

C=EVAP_RATE  F= 

LINK 

HREL  GARR  GARRR 

LD 

Release  from  Garrison  Reservoir  to  Oahe  (energy) 

PQ 

MO-JAN-DEC  B-GARR -OAHE  C=FLOW-PNLTY_ 

HPE_EDT  E-  F— 

LINK 

RREL  GARRR  OAHE 

LD 

Release  from  Garrison  Reservoir  to  Oahe 

PQ 

MO—JAN-MAR  B-GARR -OAHE  C=FLOW-PNLTY 

EDT  E-JAN  F— 

PQ 

MO=APR  E=APR 

PQ 

MO=MAY- JUN  E-MAY 

PQ 

MO-JUL  E-JUL 

PQ 

MO-AUG  E-AUG 

PQ 

MO-SEP  E-SEP 

PQ 

m e-cct 

p : 

r*r-i:"v-rr  -  r- — 

17714 


22430 
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LINK  INFLOW  S_SOORCE  OAHE  1.0  0.0 

LD  Inflow  into  Oahe  Reservoir 

IN  B-OAHE  F- 

LINK  RSTOR  OAHE  OAHE  5451  22240 

LD  Storage  in  Oahe  Reservoir 

PS  MO- JAN -MAR  B-OAHE  C— STOR- P NLTY_EDT  E-JAN  F« 

PS  MO* APR  E-APR 

PS  MO-MAY  E-MAY 

PS  MO- JUN- AUG  E-JUN 

PS  MO-SEP  E-SEP 

PS  MO-OCT  E-OCT 

PS  MO— NOV- DEC  E-JAN 

EV  C-EVAPJRATE  F- 

LINK  HREL  OAHE  OAHER 

LD  Release  from  Oahe  Reservoir  to  Big  Bend  Reservoir  (energy) 

PQ  MO— JAN - DEC  B-OAHE -BEND  C*FLOW-PNLTY_HPE_EDT  E-  F= 

LINK  RREL  OAHER  BEND 

LD  Release  from  Oahe  Reservoir  to  Big  Bend  Reservoir 

PQ  MO- JAN -MAR  B-OAHE -BEND  C-FLOW-PNLTY_EDT  E-JAN  F- 

PQ  MO- APR  E-APR 

PQ  MO-MAY -JUN  E-MAY 

PQ  MO-JUL  E-JUL 

PQ  MO-AUG  E-AUG 

PQ  MO-SEP  E-SEP 

PQ  MO-OCT  E-OCT 

PQ  MO-NOV-DEC  E-JAN 

LINK  RSTOR  BEND  BEND  1696  1813 

LD  Storage  in  Big  Bend  Reservoir 

PS  MO-JAN-FEB  B-BEND  C-STOR-PNLTY_EDT  E-JAN  F« 

PS  MO-MAR  E-MAR 

PS  MO- APR  E-APR 

PS  MO-MAY  E-MAY 

PS  MO— JUN  E-APR 

PS  MO-JUL  E-JUL 

PS  MO-AUG  E-JUL 

PS  MO-SEP  E-SEP 

PS  MO-OCT  E-OCT 

PS  MO- NOV  E-MAR 

PS  MO-DEC  E-DEC 

EV  C=EVAP_RATE  F- 

LINK  HREL  BEND  BENDR 

LD  Release  from  Big  Bend  Reservoir  to  Fort  Randall  Reservoir  (energy) 

PQ  MO- JAN -DEC  B-BEND -FTRA  C-FLOW-PNLTY_HPE_EDT  E-  F= 

LINK  RREL  BENDR  FTRA 

LD  Release  from  Big  Bend  Reservoir  to  Fort  Randall  Reservoir 

PQ  MO— JAN-MAR  B-BEND -FTRA  C-FLOW-PNLTY_EDT  E-JAN  F- 

PQ  MO-APR  E-APR 

PQ  MO-MAY -JUN  E-MAY 

PQ  MO-JUL  E-JUL 

PQ  MO-AUG  E-AUG 

PQ  MO-SEP  E-SEP 

PQ  MO-OCT  E-OCT 

PQ  MO- NOV -DEC  E-JAN 

LINK  INFLOW  S_SOURCE  FTRA  1.0  0.0 

LD  Inflow  into  Fort  Randall  Reservoir 

IN  B-FTRA  F— 

LINK  RSTOR  FTRA  FTRA  1568  4589 

LD  Storage  in  Fort  Randall  Reservoir 

PS  MO- JAN -MAR  B-FTRA  C-STOR-PNLTY_EDT  E-JAN  F- 

PS  MO-APR  E-APR 

PS  MO-MAY  E-MAY 

PS  MO-JUN  E-JUN 

PS  MO-JUL  E-JUN 

PS  MO-AUG  E-AUG 

PS  MO-SEP  E-SEP 

PS  MO-OCT  E-MAY 

PS  MO-NOV  E-NOV 

PS  MO-DEC  E-JAN 

EV  C-EVAPRATE  F- 

LINK  HREL  FTRA  FTRAR 

LD  Release  from  Fort  Randal  Reservoir  to  Gavins  Point  Reservoir  (energy) 

PQ  MO-JAN-DEC  B-FTRA-GAPT  C=FLOW-PNLTY_HPE_EDT  E-  F- 

LINK  RREL  FTRAR  GAPT 

LD  Release  from  Fort  Randal  Reservoir  to  Gavins  Point  Reservoir 

PQ  MO-JAN-MAR  B= FTRA- GAP T  C*FLOW-PNLTY_EDT  E-JAN  F- 

PQ  MO=APP  E=APR 

PQ  :<■ :  =  MA  Y  -  JU H  E = JUN 

PC- 

PC  X  ,v.\  r.  -  AUvs 

p  .  ;  :  •  -e: 

re  :  .  ■; 
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PQ 

MO-NOV-DEC  E-JAN 

LINK 

INFLOW  S  SOURCE  GAPT 

LD 

Inflow  into  Gavins  Point  Reservoir 

IN 

B-GAPT  F= 

LINK 

RSTOR  GAPT  GAPT 

LD 

Storage  in  Gavins  Point  Reservoir 

PS 

MO- JAN -FEB  B-GAPT  C-STOR-PNLTY  EDT 

E-JAN  F- 

PS 

MO-MAR  E-MAR 

PS 

MO- APR  E-APR 

PS 

MO-MAY-JUN  E-MAY 

PS 

MO-JUL  E-JUL 

PS 

MO— AUG  E=AUG 

PS 

MO-SEP  E-MAR 

PS 

MO— OCT -DEC  E-JAN 

EV 

C-EVAP_RATE  F- 

LINK 

HREL  GAPT  GAPTR 

LD 

Release  from  Gavins  Point  to  Sioux 

City  (energy) 

PQ 

MO— JAN -DEC  B-GAPT-SUX  C*FLOW-PNLTY_ 

_HPE_EDT  £-  F: 

LINK 

RREL  GAPTR  SUX 

LD 

Release  from  Gavins  Point  to  Sioux 

City 

PQ 

MO- JAN -MAR  B-GAPT-SUX  C-FLOW-PNLTY 

EDT  E-JAN  F- 

PQ 

MO- APR  E-APR 

PQ 

MO-MAY -JUN  E-MAY 

PQ 

MO-JUL  E-JUL 

PQ 

MO=AUG  E-AUG 

PQ 

MO-SEP  E-SEP 

PQ 

MO-OCT  E-OCT 

PQ 

MO-NOV-DEC  E-JAN 

LINK 

INFLOW  S  SOURCE  SUX 

LD 

Inflow  to  sXoux  City 

IN 

B— SUX  F- 

LINK 

CHANNEL  SUX  OMA 

LD 

Channel  from  Sioux  City  to  Omaha 

PQ 

MO— JAN -MAR  B-SUX-OMA  C-FLOW-PNLTY  EDT  E-JAN  F- 

PQ 

MO-APR  E-APR 

PQ 

MO-MAY  E-MAY 

PQ 

MO— JUN  E-JUN 

PQ 

MO-JUL-AUG  E-JUL 

PQ 

MO-SEP  E-SEP 

PQ 

MO-OCT  E-OCT 

PQ 

MO- NOV  E-NOV 

PQ 

MO-DEC  E-DEC 

LINK 

INFLOW  SSOURCE  OMA 

LD 

Inflow  to  Omaha 

IN 

B-OMA  F- 

LINK 

CHANNEL  OMA  NONE 

LD 

Channel  from  Omaha  to  Nebraska  City 

PQ 

MO- JAN -MAR  B-OMA-NCNE  C-FLOW-PNLTY 

EDT  E-JAN  F- 

PQ 

MO-APR -NOV  E-APR 

PQ 

MO-DEC  E-JAN 

LINK 

INFLOW  S_SOURCE  NCNE 

LD 

Inflow  to  Nebraska  City 

IN 

B-NCNE  F- 

LINK 

CHANNEL  NCNE  MKC 

LD 

Channel  from  Nebraska  City  to  Kansas  City 

PQ 

MO- JAN -MAR  B— NCNE -MKC  C-FLOW-PNLTY 

_EDT  E-JAN  F- 

PQ 

MO-APR-JUN  E-APR 

PQ 

MO-JUL -SEP  E-JUL 

PQ 

MO-OCT -NOV  E-OCT 

PQ 

MO— DEC  E-DEC 

LINK 

INFLOW  S_SOURCE  MKC 

LD 

Inflow  to  Kansas  City 

IN 

B-MKC  F= 

LINK 

CHANNEL  MKC  BNMO 

LD 

Channel  from  Kinsas  City  to  St.  Louis 

PQ 

MO- JAN -FEB  B-MKC -BNMO  C-FLOW-PNLTY 

_EDT  E-JAN  F- 

PQ 

MO-MAR  E-MAR 

PQ 

MO-APR  E-APR 

PQ 

MO-MAY  E-MAY 

PQ 

MO- JUN  E-JUN 

PQ 

MO-JUL -AUG  E-JUL 

PQ 

MO-SEP  E-SEP 

PO 

MO-OCT  E-OCT 

r; 

MO -MOV  E-NOV 

F-. 

M" -PEC  E-DEC 

tVF!.  W  f  f-'t'P'E  BUM" 
■  s  :  :  r:  vi  1  i 
r 
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LINK  CHANNEL  b4«0  HEMO 

LD  Channel  from  Boonville  to  Hermann 

PQ  MO* JAN -MAR  B—BNMO - HEMO  C=FLOW- PNLTY_EDT  E-JAN  F- 

PQ  MO- APR  E-APR 

PQ  MO-MAY  E-MAY 

PQ  MO— JUN  E-JUN 

PQ  MO-JUL-SEP  E-JUL 

PQ  MO-OCT  E-OCT 

PQ  MO-NOV-DEC  E-NOV 

LINK  INFLOW  S_SOURCE  HEMO 

LD  Inflow  to  Hermann 

IN  B— HEMO  F= 

LINK  CHANNEL  HEMO  STL 

LD  Channel  from  Hermann  to  St.  Louis  (Sink  for  now) 

PQ  MO= JAN-MAR  B—HEMO-STL  C-FLOW- PNLTY_EDT  E-JAN  F- 

PQ  MO* APR  E-APR 

PQ  MO-MAY  E-MAY 

PQ  MO-JUN  E— JT’* 

PQ  MO-JUL-SEP  fi-JUL 

PQ  MO-OCT  E-OCT 

PQ  MO-NOV-DEC  E-NOV 

LINK  CHANNEL  STL  S_SINK 

LD  Channel  from  St.  Louis  to  the  Super  Sink 

PQ  MO- JAN -DEC  B=STL-S_SINK  C-FLOW-PNLTY _EDT  E-JAN  F- 

STOP 


{Print  Network  Definition  Data} 


21  Nodes  in  this  system 


* 

ID 

Description 

1 

S  SOURCE  Super  Source 

2 

S  SINK 

Super  Sink 

3 

FTPK 

Fort  Peck 

4 

FTPKR 

Fort  Peck 

5 

GARR 

Garrison 

6 

GARRR 

Garrison 

7 

OAHE 

Oahe 

8 

OAHER 

Oahe 

9 

BEND 

Big  Bend 

10 

BENDR 

Big  Bend 

11 

FTRA 

Fort  Randall 

12 

FTRAR 

Fort  Randall 

13 

GAPT 

Gavins  Point 

14 

GAPTR 

Gavins  Point 

15 

SUX 

Sioux  City 

16 

OMA 

Omaha 

17 

NCNE 

Nebraska  City 

18 

MKC 

Kansas  City 

19 

BNMO 

Boonville 

20 

HEMO 

Hermann 

21 

STL 

St.  Louis 

6  Reservoirs  in  this  system 


• 

ID 

Link  ID 

STOl 

STOK 

1 

FTPK 

9 

13900.00 

0.0110000 

2 

GARR 

13 

15605.00 

0.0130000 

3 

OAHE 

17 

17739.00 

0.0120000 

4 

BEND 

20 

1730.00 

0.0240000 

5 

FTRA 

24 

3473.00 

0.0130000 

6 

GAPT 

28 

357.00 

0.0330000 
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43  Links  in  this  system 


#  From 

To 

Type 

Mult 

Cost 

Sum  Neg  Num 

Neg 

Description 

1  S  SOURCE 

S  SINK 

DIVR 

1.00000 

0.00 

0.0 

0 

Link  to  balance  flow  throughout  computations 

2  FTPK 

FTPK 

STOl 

1.00000 

0.00 

0.0 

0 

3  GARR 

GARR 

STOl 

1.00000 

0.00 

0.0 

0 

4  OAHE 

OAHE 

STOl 

1.00000 

0.00 

0.0 

0 

5  BEND 

BEND 

STOl 

1.00000 

0.00 

0.0 

0 

6  FTRA 

FTRA 

STOl 

1.00000 

0.00 

0.0 

0 

7  GAPT 

GAPT 

STOl 

1.00000 

0.00 

0.0 

0 

8  S  SOURCE 

FTPK 

INFL 

1.00000 

0.00 

0.0 

0 

Inflow  into  Fort  Peck  Reservoir 

9  FTPK 

FTPK 

RSTO 

1.00000 

0.00 

0.0 

0 

Storage  in  Fort  Peck  Reservoir 

10  FTPK 

FTPKR 

HREL 

1.00000 

0.00 

0.0 

0 

Hydropower  release  from  Ft .  Peck 

11  FTPKR 

GARR 

RREL 

1.00000 

0.00 

0.0 

0 

Release  from  Fort  Peck  Reservoir  to  Garrison 

12  S  SOURCE 

GARR 

INFL 

1.00000 

0.00 

0.0 

0 

Inflow  into  Garrison  Reservoir 

13  GARR 

GARR 

RSTO 

1.00000 

0.00 

0.0 

0 

Storage  in  Garrison  Reservoir 

14  GARR 

GARRR 

HREL 

1.00000 

0.00 

0.0 

0 

Release  from  Garrison  Reservoir  to  Oahe 

(energy) 

15  GARRR 

OAHE 

RREL 

1.00000 

0.00 

0.0 

0 

Release  from  Garrison  Reservoir  to  Oahe 

16  S  SOURCE 

OAHE 

INFL 

1.00000 

0.00 

0.0 

0 

Inflow  into  Oahe  Reservoir 

17  OAHE 

OAHE 

RSTO 

1.00000 

0.00 

0.0 

0 

Storage  in  Oahe  Reservoir 

18  OAHE 

OAHER 

HREL 

1.00000 

0.00 

0.0 

0 

Release  from  Oahe  Reservoir  to  Big  Bend 

Reservoir  (energy) 

1 9  OAHER  BEND 

RREL 

1.00000 

0.00 

0.0 

0 

Release  from  Oahe  Reservoir  to  Big  Bend 

Reservoir 

20  BEND 

BEND 

RSTO 

1.00000 

0.00 

0.0 

0 

Storage  in  Big  Bend  Reservoir 

21  BEND 

BENDR 

HREL 

1.00000 

0.00 

0.0 

0 

Release  from  Big  Bend  Reservoir  to  Fort 

Randall  Reservoir  (energy) 

22  BENDR  FTRA  RREL 

1.00000 

0.00 

0.0 

0 

Release  from  Big  Bend  Reservoir  to  Fort 

Randall  Reservoir 

23  S  SOURCE  FTRA 

INFL 

1.00000 

0.00 

0.0 

0 

Inflow  into  Fort  Randall  Reservoir 

24  FTRA 

FTRA 

RSTO 

1.00000 

0.00 

0.0 

0 

Storage  in  Fort  Randall  Reservoir 

25  FTRA 

FTRAR 

HREL 

1.00000 

0.00 

0.0 

0 

Release  from  Fort  Randal  Reservoir  to  Gavins 

Point  Reservoir  (energy) 
26  FTRAR  GAPT 

i 

RREL 

1.00000 

0.00 

0.0 

0 

Release  from  Fort  Randal  Reservoir  to  Gavins 

Point  Reservoir 

27  S  SOURCE  GAPT 

INFL 

1.00000 

0.00 

0.0 

0 

Inflow  into  Gavins  Point  Reservoir 

28  GAPT 

GAPT 

RSTO 

1.00000 

0.00 

0.0 

0 

Storage  in  Gavins  Point  Reservoir 

29  GAPT 

GAPTR 

HREL 

1.00000 

0.00 

0.0 

0 

Release  from  Gavins  Point  to  Sioux  City 

(energy) 

30  GAPTR 

SUX 

RREL 

1.00000 

0.00 

0.0 

0 

Release  from  Gavins  Point  to  Sioux  City 

31  S  SOURCE 

SUX 

INFL 

1.00000 

0.00 

0.0 

0 

Inflow  to  Sioux  City 

32  SUX 

OMA 

CHAN 

1.00000 

0.00 

0.0 

0 

Channel  from  Sioux  City  to  Omaha 

33  S  SOURCE 

OMA 

INFL 

1.00000 

0.00 

0.0 

0 

Inflow  to  Omaha 

34  OMA 

NCNE 

CHAN 

1.00000 

0.00 

0.0 

0 

Channel  from  Omaha  to  Nebraska  City 

35  S  SOURCE 

NCNE 

INFL 

1.00000 

0.00 

0.0 

0 

Inflow  to  Nebraska  City 

36  NCNE 

MKC 

CHAN 

1.00000 

0.00 

0.0 

0 

Channel  from  Nebraska  City  to  Kansas  City 

37  S  SOURCE 

MKC 

INFL 

1.00000 

0.00 

0.0 

0 

Inflow  to  Kansas  City 

38  MKC 

BNMO 

CHAN 

1.00000 

0.00 

0.0 

0 

Channel  from  Kansas  City  to  St.  Louis 

39  S  SOURCE 

BNMO 

INFL 

1.00000 

0.00 

0.0 

0 

Inflow  to  Boonville 

40  BNMO 

HEMO 

CHAN 

1.00000 

0.00 

0.0 

0 

Channel  from  Boonville  to  Hermann 

41  S  SOURCE 

HEMO 

INFL 

1.00000 

0.00 

0.0 

0 

Inflow  to  Hermann 

42  HEMO 

STL 

CHAN 

1.00000 

0.00 

0.0 

0 

Channel  from  Hermann  to  St.  Louis  (Sink  for 

now) 

43  STL 

S_SINK 

CHAN 

1.00000 

0.00 

0.0 

0 

Channel  from  St .  Louis  to  the  Super  Sink 
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167  Pathnuas  in  Ohi  Input 


#  Link  ♦  Typa  Strt  Mo  End  Mo  Pathnaaa 


1 

8 

XN 

2 

9 

PS 

1 

3 

3 

9 

PS 

4 

6 

4 

9 

PS 

7 

7 

5 

9 

PS 

8 

8 

6 

9 

PS 

9 

9 

7 

9 

PS 

in 

10 

8 

9 

PS 

11 

11 

9 

9 

PS 

12 

12 

10 

9 

EV 

11 

10 

PQ 

1 

12 

12 

11 

PQ 

1 

3 

13 

11 

PQ 

4 

4 

14 

11 

PQ 

5 

6 

IS 

11 

PQ 

7 

7 

16 

11 

PQ 

8 

8 

17 

11 

PQ 

9 

9 

18 

11 

PQ 

10 

10 

19 

11 

PQ 

11 

12 

20 

12 

IN 

21 

13 

PS 

1 

3 

22 

13 

PS 

4 

4 

23 

13 

PS 

5 

5 

24 

13 

PS 

6 

6 

25 

13 

PS 

7 

7 

26 

13 

PS 

8 

8 

27 

13 

PS 

9 

9 

28 

13 

PS 

10 

10 

29 

13 

PS 

11 

11 

30 

13 

PS 

12 

12 

31 

13 

EV 

32 

14 

PQ 

1 

12 

33 

15 

PQ 

1 

3 

34 

15 

PQ 

4 

4 

35 

15 

PQ 

5 

6 

36 

15 

PQ 

7 

7 

37 

15 

PQ 

8 

8 

38 

15 

PQ 

9 

9 

39 

15 

PQ 

10 

10 

40 

15 

PQ 

11 

12 

41 

16 

IN 

42 

17 

PS 

1 

3 

43 

17 

PS 

4 

4 

44 

17 

PS 

5 

5 

45 

17 

PS 

6 

8 

46 

17 

PS 

9 

9 

47 

17 

PS 

10 

10 

48 

17 

PS 

11 

12 

49 

17 

EV 

50 

18 

PQ 

1 

12 

51 

19 

PQ 

1 

3 

52 

19 

PQ 

4 

4 

53 

19 

PQ 

5 

6 

5« 

19 

PQ 

7 

7 

55 

19 

rQ 

8 

8 

56 

19 

PQ 

9 

9 

57 

19 

PQ 

10 

10 

58 

19 

PQ 

11 

12 

59 

20 

PS 

1 

2 

60 

20 

PS 

3 

3 

61 

20 

PS 

4 

4 

62 

20 

PS 

5 

5 

63 

20 

PS 

6 

6 

64 

20 

PS 

7 

7 

65 

20 

PS 

8 

8 

66 

20 

PS 

9 

9 

67 

20 

PS 

10 

10 

68 

20 

PS 

11 

11 

69 

20 

PS 

12 

12 

70 

20 

EV 

71 

21 

PQ 

1 

12 

72 

22 

PQ 

1 

3 

73 

22 

PQ 

4 

4 

74 

22 

PQ 

5 

6 

75 

22 

PQ 

7 

7 

76 

22 

PQ 

8 

8 

77 

22 

PQ 

9 

9 

78 

22 

PQ 

10 

10 

79 

22 

PQ 

11 

12 

80 

23 

IN 

81 

24 

PS 

1 

3 

82 

24 

PS 

4 

4 

83 

24 

PS 

5 

5 

84 

24 

PS 

6 

6 

85 

24 

PS 

7 

7 

86 

24 

PS 

8 

8 

87 

2  4 

PS 

9 

9 

66 

-i 

PS 

10 

10 

//FTPK/FLOW_LOC//lMON// 

/ /FTP  K / STOR-PNLTY_EDT / / JAM/ / 

/ /FTPK/STOR-PNLTY_EDT/ /APR/ / 

/ /FTPK/STOR-PMLTY_EDT//JUL/ / 

/  /FTPK/STOR-PNLTY_EDT/  /APR/  / 
//FTPK/STOR-PNLTY_EDT//SEP// 

/ /FTPK/STOR-PNLTY_EDT/ /APR// 
//FTP1C/ST0R-PNLTY_EDT//SEP// 
//FTPK/STOR-PNLTY  EDT//DEC// 
//FTPK/EVAP  RATE/71MON// 
//ftpk-garr7flow-pnlty  HPE  EDT //// 
//FTPK-GARR/FLOW-PNLTY~EDT7/JAH// 

/  /FTPK-GARR/FLOH-PNLTY_EDT/  /APR/  / 
//FTPK-GARR/FLOW-PNLTY_EDT/ /MAY/ / 
//FTPK-GARR/FLOW-PNLTY_EDT/  /  JUL/  / 
//FTPK-GARR/FLOW-PNLTY_EDT//AUG// 

/  /FTPK-GARR/FLOW-PNLTY_EDT/  /  SEP  /  / 
//FTPK-GARR/FLOW-PNLTY_EDT//OCT// 
//FTPK-GARR/FLOW-PNLTY  EDT/ /JAR// 

/ /GARR/FLOW_LOC/ / 1  MON/7 

//GARR/STOR-PNLTY_EDT/ / JAM/ / 

//GARR/STOR-PMLTY_EDT//APR// 

//GARR/STOR~PNLTY_EDT/ /MAY// 

//GARR/STOR-PNLTYJ5DT//JUN// 

//GARR/STOR-PNLTY_EDT//JUL// 

//GARR/STOR-PNLTY_EDT//AUG// 

/  /GARR/STOR-PNLTY_EDT  /  /  SEP  /  / 
//GARR/STOR-PHLTY_EDT//OCT// 

/ /GARR/ STOR-PHLTY_EDT/ /MOV/ / 
//GARR/STOR-PNLTY  EDT//JAN// 
//GARR/EVAP  RATE/71MOH// 
//garr-oahe7flow-pnlty_hpe  EDT//// 
//GARR-OAHE/FLOW-PNLTY  EDT7/JAN// 
//GARR-QAHE/FLOW-PKLTY-EDT//APR// 
//garr-oahe/flow-pmlty~edt//may// 

/ /GARR-OAHE/FLOW-PHLTY  EDT// JUL// 

/  /GARR-OAHE/FLOW-PMLTY_EDT/  /AUG/  / 

/  /GARR-OAHE/FLOH-PNLTY^BDT/  /SEP  /  / 
//GARR-OAHE/FLOW-PHLTY  EDT/ /OCT// 

/ /GARR-OAHE/FLOW-PNLTY_EDT/ / JAM/ / 

/  /OAHE/FLOW_LOC/  / 1  MON/7 
//OAHE/STOR-PHLTY  EDT//JAH// 

/ /oahe/stor-pnlty~edt//apr/ / 

/ /OAHE/STOR-PHLTY_EDT/ /MAY/ / 

/  /OAHE/STOR-PHLTY_EDT/  /  JUH// 

/ /OAHE/STOR-PHLTY_EDT/ /SEP // 

/ /OAHE/STOR-PNLTY_EDT//OCT/ / 

//OAHE/STOR-PNLTY  ED?// JAM// 

//OAHE/E'-AP  RATE/71MOM// 

//oahe-bend7flow-phlty_hpe  EDT//// 

//OAHE-BEHD/FLOW-PNLTY_EDT7/JAN// 

//OAHE-BEHD/FLOW-PNLTY_EDT//APR// 

//OAHE-BEMD/FLOW-PNLTYEDT//MAY// 

//OAHE-BEND/FLOW-PNLTY_EDT//JUL// 

//OAHE-BEMD/FLO«-PHLTY_EDT//AUG// 

//OAHE-BEMD/FLOW-PMLTYEDT//SEP// 

/  /OAHE-BEMD  /FLOH-PHLT  Y^EDT/  /OCT  /  / 
//OAHE-BEND/FLOW-PNLTY  EDT/ / JAM// 
//BEND/STOR-P  MLT Y_ED  T /7 JAN / / 
//BEMD/STOR-PHLTY_EDT/ /MAR/ / 
//BEMD/STOR-PNLTY_EDT/ /APR/ / 
//BEMD/STOR-PHLTY_EDT//MAY// 
//BEND/STOR-PNLTY_EDT//APR// 

/ /BEND/STOR-PNLTY_EDT/ / JUL/ / 

/  /BEND/  STOR-PNLTY_EDT/  /  JUL/  / 

//BEND/STOR-PNLTY_EDT//SEP// 

//BEND/STOR-PHLTY_EDT//OCT// 

//BEHD/STOR-PNLTY  EDT/ /MAR// 

//BEND/STOR-PNLTY'EDT//DEC// 

//OAHE/EVAP  RATE/71MON// 

//bemd-ftra7flow-pmlty_hpe  EDT//// 

//bend-ftra/flow-pnlty_edt7/jan// 

//bend-ftra/flow-pnlty_edt//apr// 

//bend-ftra/flow-pnlty_edt//may// 

/ /BEND-FTRA/FLOW-PNLTY_EDT / /JUL/ / 
//BEND-FTRA/FLOW-PNLTY_EDT//AUG// 
//BEND-FTRA/FLOW-PNLTY_EDT//SEP// 
//BEND-FTRA/FLOW-PNLTY_EDT//OCT// 
//BEND-FTRA/FLOW-PNLTY  EDT/ /JAM// 

/ /FTRA/FLOW_LOC  /  /  1MON /7 
//FTRA/STOR-PNLTY_EDT//JAN// 
//FTRA/STOR-PNLTY_EDT//APR// 
//FTRA/STOR-PNLTY_EDT//MAY/ / 
//FTRA/STOR-PNLTY_EDT//JUN// 
//FTRA/STOR-PNLTY_EDT//JUN// 
//FTRA/STOR-PNLTY_EDT//AUG// 
//FTRA/STOR-PNLTY_EDT./SEP/ / 
//FTRA/STOR-PNLTY  EDT/ /MAY// 
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89 

24 

PS 

11 

11 

90 

24 

PS 

12 

12 

91 

24 

EV 

92 

25 

PQ 

1 

12 

93 

26 

PO 

1 

3 

94 

26 

PQ 

4 

4 

95 

26 

PQ 

5 

6 

96 

26 

PQ 

7 

7 

97 

26 

PQ 

8 

6 

98 

26 

PQ 

9 

9 

99 

26 

PQ 

10 

10 

1  0 

26 

PQ 

11 

12 

lei 

27 

IN 

102 

28 

PS 

1 

2 

103 

28 

PS 

3 

3 

104 

28 

PS 

4 

4 

105 

28 

PS 

5 

6 

106 

28 

PS 

7 

7 

107 

28 

PS 

8 

8 

108 

28 

PS 

9 

9 

109 

28 

PS 

10 

12 

110 

28 

EV 

111 

29 

PQ 

1 

12 

112 

30 

PQ 

1 

3 

113 

30 

PQ 

4 

4 

114 

30 

PQ 

5 

6 

115 

30 

PQ 

7 

7 

116 

30 

PQ 

8 

8 

117 

30 

PQ 

9 

9 

118 

30 

PQ 

10 

10 

119 

30 

PQ 

11 

12 

120 

31 

IN 

121 

32 

PQ 

1 

3 

122 

32 

PQ 

4 

4 

123 

32 

PQ 

5 

5 

124 

32 

PQ 

6 

6 

125 

32 

PQ 

7 

8 

126 

32 

PQ 

9 

9 

127 

32 

PQ 

10 

10 

128 

32 

PQ 

11 

11 

129 

32 

PQ 

12 

12 

130 

33 

IN 

131 

34 

PQ 

1 

3 

132 

34 

PQ 

4 

11 

133 

34 

PQ 

12 

12 

134 

35 

IN 

135 

36 

PQ 

1 

3 

136 

36 

PQ 

4 

6 

137 

36 

PQ 

7 

9 

138 

36 

PQ 

10 

11 

139 

36 

PQ 

12 

12 

140 

37 

IN 

141 

38 

PQ 

1 

2 

142 

38 

PQ 

3 

3 

143 

38 

PQ 

4 

4 

144 

38 

PQ 

5 

5 

145 

38 

PQ 

6 

6 

146 

38 

PQ 

7 

8 

147 

38 

PQ 

9 

9 

148 

38 

PQ 

10 

10 

149 

38 

PQ 

11 

11 

150 

38 

PQ 

12 

12 

151 

39 

IN 

152 

40 

PQ 

1 

3 

153 

40 

PQ 

4 

4 

154 

40 

PQ 

5 

5 

155 

40 

PQ 

6 

6 

156 

40 

PQ 

7 

9 

157 

40 

PQ 

10 

10 

158 

40 

PQ 

11 

12 

159 

41 

IN 

160 

42 

PQ 

1 

3 

161 

42 

PQ 

4 

4 

162 

42 

PQ 

5 

5 

163 

42 

PQ 

6 

6 

164 

42 

PQ 

7 

9 

165 

42 

PQ 

10 

10 

166 

42 

PQ 

11 

12 

167 

43 

PQ 

1 

12 

//FTRA/STOR-PNLTY_EDT//NOV// 
//FTRA/STOR-PHLTY  EDT// JAN// 
//FTRA/EVAP  RATE/71MON// 
//FTRA-GAPT7FLOU-PMLTY  HPE  EDT//// 
//ftra-gapt/flow-pnlty~edt7/jan// 

/  /FTRA-GAPT/FLOW-PNLTY_EDT//APR/  / 

/ /FTRA-GAPT/FLOW-PNLTY_BDT/ / JUN/  / 
//FTRA-GAPT/FLOW-PKLTY_EDT// JUL// 
//FTRA-GAPT/FLOW-PNLTY_EDT//AUG// 
//FTRA-GAPT/FLOW-PNLTY_EDT//SEP// 

/ /FTRA-GAPT  /rLOW-PNLTY_EDT//OCT/  / 
// FTRA-GAPT /FLOW- PNLTY  EDT// JAN/ / 

//GAPT/FLOW_LOC//lMON/7 
//GAPT/STOR-PNLTY_EDT/ / JAN/ / 

/  /GAP  T  /  S  TOR-PNLTY_EDT  /  /MAR/  / 
//GAPT/STOR-PNLTY_EDT//APR// 

/ /GAPT/STOR-PNLTY_EDT//MAY// 

/ /GAPT /STOR-PNLTY_EDT/ / JUL/ / 
//GAPT/STOR-PNLTY_EDT//AUG// 
//GAPT/STOR-PNLTY_EDT//MAR// 
//GAPT/STOR-PNLTY  EDT// JAN// 

//gapt/evap_rate/7imon// 

/ /GAPT -SUX/ FLOW- PNLTY_HPE  EDT//// 

//gapt-sux/flow-pnlty_edt7/jan// 

//GAPT-SUX/FLOW-PNLTY_EDT//APR// 
//GAPT-SUX/FLOW-PNLTY_EDT//MAY// 
//GAPT  -SUX/FLOW-PNLTY_EDT/  /  JUL/  / 
//GAPT-SUX/FLOW-PNLTY_EDT//AUG// 

/ /GAPT-SUX/FLOW-PNLTY_EDT/ /SEP/ / 
//GAPT-SUX/FLOW-PNLTY_EDT//OCT// 
//GAPT-SUX/FLOW-PNLTY  EDT/ /JAN// 

/  /  SOX  /  FLOW_LOC  /  / 1  MON  /7 
//SUX-OMA/FLOW-PNLTY_EDT//JAN// 

/ /SUX-OMA/FLOW-PNLTY_EDT/ /APR/ / 
//SUX-OMA/FLOW-PNLTY_EDT//MAY// 

/ /SUX-OMA/FLOW-PNLTYEDT// JUN/ / 
//SUX-OMA/FLOW-PNLTY_EDT//JUL// 
//SUX-OHA/FLOW-PNLTYEDT//SEP// 
//SUX-OMA/FLOW-PNLTY_EDT//OCT// 

/  /SUX-OMA/FLOW-PNLTYEDT/  /NOV/  / 
//SUX-OMA/FLON-PNLTY  EDT/ /DEC/ / 
//OMA/FLOW  LOC//1MON7/ 

/  /oma-ncne7flo«-pnlty_edt/  /  JAN/  / 

//OMA-NCNE/FLOH-PNLTYEDT//APR// 
//OMA-NCNE/FLOW-PNLTY  EDT// JAN/ / 
//NCNE/FL0W_L0C//XM0N7/ 
//NCNE-MKC/FLOW-PNLTYEDT//JAN// 

/  /NONE  -MKC/FLOH-PNLTY_EDT/  /APR/  / 
//NCNE-MKC/FLON-PNLTY_EDT//JUL// 

/ /NCNE-MKC/FLOH-PNLTY_EDT//OCT/ / 
//NCNB-MKC/FLOW-PNLTY  EDT/ /DEC/ / 
//MKC/FLOH  LOC//1MON/7 
/ /MKC  -  BNM07FLOW- PNLT  Y_EDT  /  /  JAN  /  / 

/ /MXC  -  BNMO/ FLOW  -  PNLTY_EDT  / /MAR  /  / 
//MKC-BNMO/FLOW-PNLTY_EDT//APR// 

/  /MKC-BNMO/FLOW-PNLTY_EDT/  /MAY/  / 
//MKC-BNMO/FLOW-PNLTYEDT//JUN// 
//MKC-BNMO/FLOW-PNLTY_EDT//JDL// 
//MKC-BNMO/FLOW-PNLTY_EDT//SEP// 
//MKC-BNMO/FLOW-PNLTY_EDT//OCT// 
//MKC-BNMO/FLOW-PNLTY_EDT//NOV// 
//MKC-BNMO/FLOW-PNLTY  EDT/ /DEC// 
//BNMO/FLOW  LOC  /  /  1MON7 / 

/ /bnmo-hemo7flow-pnlty_edt// JAN/ / 

//BNMO-HEMO/FLOW-PNLTY  EDT/ /APR// 

/ /BNMO-HEMO/FLOW-PNLTY~EDT/ /MAY// 

/ /BNMO-HEMO/FLOW-PNLTY_EDT/ /  JON/ / 

/ /BNMO-HEMO/FLOW-PNLTY_EDT/ /  JUL// 

/ /BNMO-HEMO/FLOW-PNLTY_EDT/ /OCT/ / 
//BNMO-HEMO/FLOW-PNLTY  EDT/ /NOV// 

/ /HEMO/FLOW_LOC/ /  1MON/7 

/ / HEMO- STL/ FLOW- PNLT Y_EDT// JAN// 

/ /HEMO-STL/FLOW-PNLTY  EDT/ /APR// 

/  /hemo-stl/flow-pnlty2edt//may// 

//HEMO-STL/FLOW-PNLTY_EDT/ / JUN/ / 
//HEMO-STL/FLOW-PNLTY_EDT//JUL// 
//HEMO-STL/FLOW-PNLTY_EDT//OCT// 
//HEMO-STL/FLOW-PNLTY_EDT//NOV// 
//STL-S  S INK / FLOW -PNLT Y  EDT/ / JAN/ / 


{ Read  penalty  functions  and  time  series  data  and  generate  network.} 


DSS- 

--  ZREAD 

Unit 

71; 

Vers . 

1: 

//FTPK/FLGW  LOC/Ol JAN1 960/lMON/ / 

DSS- 

--  ZREAD 

Unit 

72; 

Vers . 

Is 

//FTPK/STOR-PHLTY 

EDT //JAM// 

DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

//FTPK/STOR-PNLTY” 

EDT/ / JAW/EXMPL1/ 

DSS- 

-  -ZWP.ITE 

Unit 

73; 

Vers . 

i : 

/  /FTPK/STOF.-?HL?7“ 

"EDT/ 'FEB/EXMPL1 / 
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- DSS— 

-WRITE 

Unit 

73; 

V«ra . 

3: 

- oss— 

-  2 READ 

Onit 

72; 

Vers. 

Is 

- DSS— 

-WRITE 

Unit 

73; 

Vara. 

3: 

- DSS-- 

-Z  WRITE 

Onit 

73; 

Vera . 

3: 

- DSS— 

-WRITE 

Onit 

73; 

Vera . 

3: 

-  ZREAD 

Onit 

72; 

Vera. 

1: 

- DSS— 

-WRITE 

Onit 

73; 

Vera . 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vera. 

1: 

-ZWRITE 

Onit 

73; 

Vers . 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vers . 

1: 

-ZWRITE 

Onit 

73; 

Vera . 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vera . 

1: 

- DSS-- 

-ZWRITE 

Onit 

73; 

Vera . 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vera . 

1: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vera. 

3: 

-  ZREAD 

Onit 

72; 

Vera . 

Is 

- DSS— 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS— 

-  ZREAD 

Onit 

71; 

Vera . 

2: 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS  — 

-ZWRITE 

Onit 

73; 

Vera. 

3: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vers . 

3: 

- DSS  — 

-ZWRITE 

Onit 

73; 

Vera . 

3: 

- DSS  — 

-ZWRITE 

Onit 

73; 

Vers . 

3; 

-ZWRITE 

Onit 

73; 

Vers. 

3: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vera. 

3: 

-  B'M'K 

-ZWRITE 

Onit 

73; 

Vers . 

3: 

Lv  tTcf-CC 

-ZWRITE 

Onit 

73; 

Vers. 

3: 

- DSS-- 

-ZWRITE 

Onit 

73; 

Vers. 

3: 

- DSS  — 

-ZWRITE 

Onit 

73; 

Vers . 

3: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vers. 

3: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vers . 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vers . 

3: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vers . 

3; 

- DSS— 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vers . 

3; 

-  ZREAD 

Onit 

72; 

Vers . 

2; 

- DSS— 

-ZWRITE 

Onit 

73; 

Vers . 

3: 

- DSS  — 

-  ZREAD 

Onit 

72; 

Vers. 

2: 

- DSS  — 

-ZWRITE 

Onit 

73; 

Vers. 

3: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vera . 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vera. 

2: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vera. 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vera. 

2: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vera. 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vera. 

2: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vers. 

3: 

-  ZREAD 

Onit 

72; 

Vera. 

2: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vers . 

3: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vers. 

3: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS— 

-  ZREAD 

Onit 

71; 

Vers. 

Is 

-  ZREAD 

Unit 

72; 

Vers. 

Is 

- DSS  — 

-ZWRITE 

Onit 

73; 

Vers . 

3: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vera. 

3: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vera . 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vera . 

Is 

- DSS— 

-ZWRITE 

Onit 

73; 

Vera . 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vera. 

Is 

- DSS— 

-ZWRITE 

Onit 

73; 

Vera . 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vera. 

Is 

- DSS— 

-ZWRITE 

Onit 

73; 

Vera. 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vers . 

Is 

-ZWRITE 

Onit 

73; 

Vera. 

3s 

- DSS— 

-  ZREAD 

Onit 

72; 

Vera. 

Is 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vera. 

3s 

- DSS— 

-  ZREAD 

Onit 

72; 

Vers. 

1: 

- DSS— 

-ZWRITE 

Onit 

73; 

Vera. 

3s 

- DSS— 

-  ZREAD 

Onit 

72; 

Vera . 

Is 

- DSS— 

-ZWRITE 

Onit 

73; 

Vera. 

3: 

- DSS— 

-  ZREAD 

Onit 

72; 

Vera . 

Is 

-ZWRITE 

Onit 

73; 

Vers . 

3s 

- DSS— 

-  ZREAD 

Onit 

72; 

Vera . 

Is 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS— 

-  ZREAD 

Onit 

71; 

Vers . 

2  s 

- DSS  — 

-  ZREAD 

Onit 

72; 

Vera . 

2: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers . 

3s 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- - 

-ZWRITE 

Onit 

73; 

Vers. 

3: 

- DSS  — 

-ZWRITE 

Onit 

73; 

Vers . 

3: 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS-- 

-ZWRITE 

Unit 

73/ 

Vers . 

3: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

. DSS- - 

-  ZREAD 

Unit 

72? 

Vers  . 

o  . 

-ZWRITE 

Unit 

73; 

Vers  . 

3: 

- DSS- - 

-ZWRITE 

Unit 

73; 

Verr. 

3  : 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vers . 

‘  : 

/ /FTPK/STOR-PNLTY_EDT/ /MAR/EXMPL1  / 
//FTPK/STOR-PNLTY_EDT/ /APR/  / 

/ /FTP  K  /  STOR- PNLTY_EDT/ / APR/ EXMPL1  / 

/ /FTPK/STOR-PNLTY_EDT/ /MAY/EXMPL1  / 

/ /FTPK/STOR-PNLTY  EDT// JON/EXMPL1/ 
//FTPK/STOR-PNLTYJBOT//JOL// 

/  /FTPK/STOR-PNa.TY__EDT/ / JUL/EXMPL1/ 
//FTPK/STOR-PNLTY_EDT//APR// 

/ /FTPK/STOR-PNLTY_EDT/ /AOG/EXMPL1/ 
//FTPK/STOR-PNLTY_EDT//SEP// 

/ /FTPK/STOR-PNLTY_EDT/ /SEP /EXMPL1 / 

/ /FTPK/STOR-PNLTY_EDT//APR// 

/  /FTPK/STOR-PNLTY_EDT/  /OCT/EXMPL1  / 
//FTPK/STOR-PNLTY_EDT//SEP// 
//FTPK/STOR-PNLTY_EDT//NOV/EXMPLl/ 
//FTPK/STOR-PNLTY_EDT//DEC// 
//FTPK/STOR-PNLTY  EDT//DEC/EXMPL1 / 
//FTPK/EVAP  RATE/71 JAN1 960/ 1MON// 

/  /FTPK  -garr7flow-pnlty_hpe_edt/  III 

//FTPK-FTPKR/FLOW-PNLTY_HPE_EDT//JAN/EXMPLl/ 
//FTPK-FTPKR/FLOW-PNLTY_HPE_EDT//FEB/EXMPLl/ 
//FTPK-FTPKR/FLOW-PNLTY_HPE_EDT//MAR/EXMPLl  / 
//FTPK-FTPKR/FLOW-PNLTY_HPE_EDT//APR/EXMPLl/ 
/  /FTPK-FTPKR/FLOW-PNLTY_HPE_EDT/  /MAY/BXMPL1/ 
//FTPK-FTPKR/FLOW-PNLTY_HPE_EDT//JUN/EXMPLl/ 
//FTPK-FTPKR/FLOW-PNLTY_HPE_EDT//JUL/EXMPLl/ 
//FTPK-FTPKR/FLOW-PNLTY_HPE_EDT//AOG/EXMPLl/ 
//FTPK-FT?KR/FLOW-PNLTY_HPE_EDT//SEP/EXMPLl/ 
//FTPK-FTPKR/FLOW-PNLTY_HPE_EDT//OCT/EXMPLl/ 
//FTPK-FTPKR/FLOW-PNLTY_HPE_EDT//NOV/EXMPLl/ 
//FTPK-FTPKR/F1/W-PNLTY_HPE  EDT/ /DEC/EXMPLl/ 

//ftpk-garr/flow-pnlty_edt/7jan// 

//FTPKR-GARR/FLOW-PNLTY_EDT//JAN/EXMPLl/ 

//FTPKR-GARR/FLOW-PNLTY_EDT//FEB/EXMPLl/ 

/  /FTPKR-GARR/FLOW-PNLTY_EDT//MAR/EXMPLl/ 
//FTPK-GARR/FLOW-PNLTYJSDT//APR// 
//FTPKR-GARR/FLOW-PNLTY_EDT//APR/EXMPLl/ 
//FTPK-GARR/FLOW-PNLTY_EDT//MAY// 

/  /FTPKR-GARR/FLOW-PNI.TY_EDT//MAY/EXHPLl  / 

/  /FTPKR-GARR/FLOW-PNLTY_EDT/  /  JON/EXHPL1  / 

/ /FTPK-GARR/FLOW-PNLTY_EDT//JOL// 

/  /FTPKR-GARR/FLOW-PHLTYJEDT  /  /  JUL/EXMPL1  / 
//FTPK-GARR/FLOW-PNLTY_BDT/ /AUG/ / 

/ /ftpkr-garr/flow-pnlty_edt//aug/exmpli / 

//FTPK-GARR/FLOW-PNLTY_BDT//SEP// 
//FTPKR-GARR/FLCM-PNLTY  Et)T /  / SEP / EXMPL1 / 
//FTPK-GARR/FLOM-PNLTY_?DT//OCT// 
//FTPKR-GARR/FLOW-PNLTY_EDT/ /OCT/EXMPL1/ 
//FTPK-GARR/FLGW-PNLTY  EDT/ /JAN// 
//FTPKR-GARR/FLOW-PNLTY_EDT//NOV/EXMPL1/ 
//FTPKR-GARR/FLOW-PNLTY  EDT//DEC/EXHPL1/ 

//garr/flow_loc/oijani95o/imon// 

//GARR/STOR-PNLTY_EDT//JAN// 

/  /GARR/STOR-PNLTYJBDT/ /  JAN/EXMPL1  / 

/ /GARR/STOR-PNLTY_EDT/ /FEB/EXMPL1/ 

/ /GARR/STOR-PNLTY_EDT/ /MAR/EXMPL1  / 

/  /GARR/STOR-PNLTY_EDT/  /APR// 

/  /GARR/STOR-PNLTY_EDT/  /APR/EXMPL1/ 

/ /GARR/STOR-PNLTY_EDT/ /MAY/ / 

/ /GARR/STOR-PNLTY_EDT//MAY/EXMPLl  / 

/ /GARR/STOR-PNLTY_EDT// JON/ / 
//GARR/STOR-PNLTY_EDT//JUN/EXMPLl/ 
//GARR/STOR-PNLTY_EDT/ / JUL/ / 

/ /GARR/STOR-PNLTY_EDT/ / JUL/EXMPL1  / 
//GARR/STOR-PNLTY_EDT//AOG// 

/  /GARR/STOR-PNLTY_EDT/ /AOG/EXMPL1  / 
//GARR/STOR-PNLTY_EDT//SEP// 

/  /GARR/  STOR-PNLTY_EDT  /  /  3EP/EXMPL1  / 

//GARR/STOR-PNLTY_EDT//OCT// 

//GARR/STOR-PNLTY_EDT//OCT/EXMPLl/ 

/ /GARR/STOR-PNLTY_EDT/ /NOV/ / 

/ /GARR/STOR-PNLTY_EDT/ /NOV/EXMPL1  / 

/ /GARR/STOR-PNLTY_EDT/ / JAN/ / 
//GARR/STOR-PNLTY  EDT/ /DEC/EXMPLl/ 
//GARR/EVAP  RATE /71JAN1 960 /1MON// 
//GARR-OAHE7FLON-PNLTY  HPE_EDT //// 

/  /GARR-GARRR/FLOW-PNLTY_HPE_EDT//JAN/EXMPLl  / 
/ /GARR-GARRR/FLOH-PNLTY_HPE_EDT//FEB/EXMPLl  / 
/ /GARR-GARRR/FI  n«-PNLTY_HPE_EDT//MAR/EXMPLl  / 
//GARR-GARRR/F.,  .<-PNLTY_HPE_EDT//APR/EXMPLl/ 
/ /GARR -GARRR  /  FLOW- P  NLTY_HP  E_EDT  / /MAY  /  EXMP  L 1  / 
//GARR-GARRR/FLOW-PNLTY_HPE_EDT//JUN/EXMPLl/ 
/  /GARR-GARRR/FLOW-PNLTY_HPE_EDT/  /  JUL/EXMPL1  / 
//GARR-GARRR/FLOW-PNLTY_HPE_EDT//ADG/EXMPLl/ 
//GARR-GARRR/FLOW-PNLTY_HPE_EDT//SEP/EXMPLl/ 
//GARR-GARRR/FLOW-PNLTY_HPE_EDT//OCT/EXMPLl/ 
//GARR-GARRR/FLOW-PNLTY_HPE_EDT//NOV/EXMPLl/ 
//GARR-GARRR/FLOW-PNLTY_HPE  EDT/ /DEC/EXMPLl / 

//garr-oahe/flow-pnlty_edt/7jan// 

/ /GARRR-OAHE/FLOW-PNLTY_EDT/ / JAN/EXMPL1/ 
,'/GAPP.R-OAHE/FLOW-PNLTY_EDT//FEB/EXMPLl/ 
//GAP.RP.-OAHE/FLOW-PNLTY  EDT/ /MAP./EXMPL1  / 
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- DSS-- 

-  ZREAD 

Unit 

12, 

Vers. 

2: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- - 

-  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS*- 

-Z WRITE 

Unit 

73; 

Vers. 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS*- 

-  ZREAD 

Unit 

72; 

Vera . 

2: 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vera. 

2: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS- - 

-  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- - 

-  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- - 

-  ZREAD 

Unit 

71; 

Vers. 

1: 

NUMNEG: 

3 

SUMNEG: 

-266 

Path:  //OAHE/FLOH 

_LOC / / 1MON / / 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vera . 

1: 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS- - 

-  ZREAD 

Unit 

72; 

Vera. 

1: 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS- - 

-  ZREAD 

Unit 

72; 

Vera. 

1: 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vers. 

1: 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vera. 

1: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vera. 

1: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vers. 

1: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS— 

-  ZREAD 

Unit 

71; 

Vers. 

2: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vera. 

2: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS  — 

-ZHRITE 

Unit 

73; 

Vera. 

3: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS— 

-  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vera. 

2: 

- - DSS— 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS  — 

-  ZREAD 

Unit 

12, 

Vers . 

2: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vera . 

2: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS— 

-  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- - 

-  ZREAD 

Unit 

12, 

Vera . 

1: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vera . 

1: 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- - 

-  ZREAD 

Unit 

72; 

Vers . 

1: 

. DSS- - 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vers . 

1: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- - 

-  ZREAD 

Unit 

72; 

Vers . 

1 : 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- - 

-  ZREAD 

Unit 

72; 

Vers . 

1 : 

. DSS- - 

-ZWRITE 

Unit 

73; 

Ve  r  s  . 

3: 

- DSS- - 

-  ZREAD 

Unit 

72; 

Ve  r  s . 

1 : 

- DSS- - 

-ZWPITE 

Ur.it 

1  5  . 

Ve  r  r . 

3 : 

- DSS - - 

-  ZREAD 

Unit 

'  2  ; 

Ve  r  :> . 

1  : 

/  /GARR-OAHE/FLOH-PNLTY_EDT/  /  APR/  / 
//GARRR-OAHE/FLOH-PNLTY  EDT//APR/EXMPL1/ 
//GARR-OAHE/FLOH-PNLTYJBDT//MAY// 
//GARRR-OAHE/FLOH-PNLTY  EDT/ /MAY/BXMPL1/ 
//GARRR-OAHE/FLOH-PNLTY_EDT//JUN/EXMPLl/ 
/ /GARR-OAHE/FLOH-PNLTY_EDT/ / JUL/ / 
//GARRR-OAHB/FLOH-PNLTY_eDT//JUL/EXMPLl/ 
//GARR-OAHE/FLOH-PNLTY_EDT//AUG/ / 
//GARRR-OAHE/FLOH-PHLTY  EDT//AUG/EXMPL1/ 
//GARR-OAHE/FLOW-PNLTY_EDT//SEP// 
//GARRR-OAHE/FLOH-PNLTY_EDT//SEP/EXMPLl/ 
//GARR-OAH£/FLOH-PNLTY_EDT//OCT// 
//GARRR-OAHE/FLOH-PHLTY  EDT//OCT/EXMPL1/ 
/ /GARR-OAHE/FLOH-PNLTY_EDT/ / JAN/ / 

/ /GARRR-OAHE/FLOH-PHLTY_EBT/ /NOV/EXMPL1  / 
//GARRR-OAHE/FLOH-PHLTY  EDT//DEC/EXMPL1/ 
//OAHE/FLOH  LOC/01JAN19?0/1MON// 


000  SUMNEG:  -0.266000E+03 


//OAHE/STOR-PHLTY_EDT//JAH// 

/  /OAHE/STOR-PNLTY_EDT/  /  JAN/EXMPL1  / 
//OAHE/STOR-PNLTY_EDT//FEB/EXMPL1/ 

/ /OAHE/STOR-PHLTY_EDT/ /MAR/EXMPL1  / 

//OAHE/STOR-PNLTY_EDT//APR// 

//OAHE/STOR-PHLTY_EDT//APR/EXMPLl/ 

/ /OAHE/STOR-PHLTY_EDT/ /MAY/ / 

//OAHE/STOR-PNLTY_EDT//MAY/EXMPLl/ 

//OAHE/STOR-PNLTY_EDT//JUN/ / 

//OAHE/STOR-PHLTY_EDT//JUN/EXMPL1/ 

//OAHE/STOR-PNLTY_EDT//JUL/EXMPLl/ 

//OAHE/STOR-PHLTY_EDT//AOG/EXMPL1/ 

/ / OAHE / STOR- PHLT Y_EDT / / SEP / / 
//OAHE/STOR'PHLTY_EDT//SEP/EXMPL1/ 
//OAHE/STOR-PHLTY_EDT//OCT// 
//OAHE/STOR-PHLTY_EDT//OCT/EXMPLl/ 

/  /OAHE  /STOR-PHLTY_EDT/  /  JAN/  / 
//OAHE/STOR-PNLTY_EDT//NOV/EXMPL1/ 

/ / OAHE/STOR-PNLTY  EDT//DEC/EXMPL1 / 
//OAHE/EVAP  RATE/fflJAN1960/lMON// 
//OAHE-BEHD7FLOH-PHLTY  HPE  EDT//// 
//OAHE-OAHER/FLOH-PHLTY_HPE_EDT/  /  JAN/EXMPL1  / 

/  /oahe-oaher/fioh-pklty~hpe_edt/ /feb/exmpli / 

//OAHE-OAHER/FLOH-PHLTY_BPE_EDT/ /MAR/EXMPL1  / 
//OAHE-OAHER/FLOH-PNLTYHPEEDT//APR/EXMPH/ 
//OAHE-OAHER/FLOH-PNLTY_HPE_EDT/  /MAY/EXMPL1  / 

//oahe-oaher/floh-pnlty_hpe_edt//jon/exmpli/ 

//oahe-oaher/floh-pnlty_hpe_edt//jul/exmpli/ 

//oahe-oaher/flow-phlty_hpe_edt//aog/exmpli/ 

/ /oahe-oaher/floh-phlty_hpe_edt/ /sep/exmpli / 

/ / oahe-oaher/floh-pnlty_hpe_edt/ /oct/exmpli / 

//oahe-oaher/floh-pnlty_hpb_edt//nov/bxmpli/ 

//oahe-oaher/floh-phlty  hpe  edt//dec/exmpli/ 

//oahe-bend/floh-pnlty_edt/7jan// 

//oaher-bend/floh-phlty_edt//jan/exmpli/ 

//oaher-bekd/floh-pnlty_edt//feb/exmpli/ 

//OAHER-BEND/FLOH-PHLTY  EOT/ /MAR/EXMPL1 / 

/ /OAHE-BEND/FLOH-PHLTY_EDT//APR/ / 

/ /OAHER-BEND/FLOH-PNLTY_EDT/ /APR/EXMPL1/ 
//OAHE-BEND/FLOH-PHLTY  EOT/ /MAY// 

/ /OAHER-BENO/FLOH-PHLTY_EDT/ /MAY/EXMPL1  / 

/ /OAHER-BEND/FLOH-PHLTY_EDT/ / JUN/EXMPL1/ 

//OAHE-BEND/FLOH-PNLTY_EDT//JUL// 

//OAHER-BEND/FLOH-PHLTY_EDT//JUL/EXMPLl/ 

//OAHE-BEHD/FLOH-PNLTY_EDT//AOG// 

//OAHER-BEND/FLOH-PHLTY_EDT//AUG/EXHPLl/ 

/ /OAHE-BEND/FLOH-PNLTY  EDT/ /SEP// 

/ /OAHER-BENO/FLOH-PNLTY_EDT/ /SEP/EXMPLl/ 

// OAHE - BEHD / FLOH- P NLTY_EDT // OCT / / 
//OAHER-BEND/FLOH-PHLTY_EDT//OCT/EXMPLl/ 
//OAHE-BEND/FLOH-PNLTY  EDT/ /JAN/ / 
//OAHER-BEND/FLOH-PNLTY_EDT//NOV/EXMPLl/ 
//OAHER-BEHD/FLOH-PNLTY_EDT//DEC/EXMPLl/ 

/ /BEND / STOR-PNLT Y_EDT / / JAN/ / 
//BEND/STOR-PNLTY_EDT// JAN/EXHPL1/ 

/ /BEND /STOR- PNLTY_EDT// FEB/EXMPLI/ 

/ /BEND/STOR-PNLTY_EDT//HAR/ / 

// BEND/ STOR-PNLTY_EDT/ /MAR/ EXHPL1/ 

/ /BEND/STOR-PNLTY_EDT/ /APR/ / 

/ /BEND/STOR-PNLTY_EDT/ /APR/EXMPL1 / 
//BEND/STOR-PNLTY_EDT//MAY// 

/ /BEND/STOR-PNLTY_EDT/ /MAY/EXMPL1 / 
//BEND/STOR-PNLTY_EDT/ /APR// 

/ /8END/ST0R-PNLTY_EDT/ / JUN/EXMPL1 / 
//BEND/STOR-PNLTY_EDT//JUL// 

/ /BEND / STOR -PNLTY_EDT / / JUL/EXMF L 1  - 
/ / BEND/ STOR- PNLTY_EDT / / JDL/ / 

' / BEND/ STOR -PNLTY_EDT / / AUG/EXHr  LI  ' 

/  ' BEND /STOR-PNLT Y  EDT//SEP/ / 
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- DSS-- 

-Z WRITE 

Unit 

73; 

Ver  a. 

3: 

. DSS-- 

-  ZREAD 

Unit 

72; 

Vers . 

Is 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vers. 

1: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vera . 

1: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers . 

3 : 

- DSS— 

-  ZREAD 

Unit 

71; 

Vera. 

2: 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers . 

3 : 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vers . 

3s 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vera . 

3: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers. 

3s 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers . 

3s 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vera . 

3s 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers . 

3s 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vers. 

3s 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vers . 

2s 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers. 

3  s 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vers . 

3s 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers. 

3s 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vera . 

2s 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vera . 

3s 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers . 

3 : 

- DSS— 

-  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers . 

3s 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS— 

-  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS— 

-ZWRITE 

Unit 

73; 

Vers . 

3s 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vera . 

2s 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers. 

3s 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vers . 

3s 

- DSS  — 

-  ZREAD 

Unit 

71; 

Vers. 

Is 

NUMNEG: 

2 

SUMNEG: 

-52 

Paths  // FTRA/FLOW 

LOC//1MON// 

- DSS - ZREAD 

Unit 

72; 

Vers. 

1 

- DSS - 7  WRITE 

Unit 

73; 

Vers. 

3 

- DSS - ZWRITE 

Unit 

73; 

Vers. 

3 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

- DSS - ZREAD 

Unit 

72; 

Vers . 

1 

- DSS - ZWRITE 

Unit 

73; 

Vers. 

3 

- DSS - ZREAD 

Unit 

72; 

Vera. 

1 

- DSS - ZWRITE 

Unit 

73; 

Vers. 

3 

- DSS - ZREAD 

Unit 

72; 

Vers . 

1 

- DSS - ZWRITE 

Unit 

73; 

Vers. 

3 

- DSS - ZREAD 

Unit 

72; 

Vera . 

1 

- DSS - ZWRITE 

Unit 

73; 

Vera. 

3 

- DSS - ZREAD 

Unit 

72; 

Vera . 

1 

- DSS - ZWRITE 

Unit 

73; 

Vers. 

3 

- DSS - ZREAD 

Unit 

72; 

V^ra. 

1 

- DSS - ZWRITE 

Unit 

73; 

Vera . 

3 

- DSS - ZREAD 

Unit 

72; 

Vera. 

1 

- DSS - ZWRITE 

Unit 

73; 

Vera . 

3 

- DSS - ZREAD 

Unit 

72; 

Vera. 

1 

- DSS - ZWRITE 

Unit 

73; 

Vera . 

3 

- DSS - ZREAD 

Unit 

72; 

Vera . 

1 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

- DSS - ZREAD 

Unit 

71; 

Vera . 

2 

- DSS - ZREAD 

Unit 

72; 

Vers. 

2 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

- DSS - ZWRITE 

Unit 

73; 

Vera. 

3 

- DSS - ZWRITE 

Unit 

73; 

Vera . 

3 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

- DSS - ZWRITE 

Unit 

73; 

Vers. 

3 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

. DSS- --ZWRITE 

Unit 

73; 

Vers. 

3 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

- DSS - ZREAD 

Unit 

72; 

Vers. 

2 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

. DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

- D  S3 - ZREAD 

Unit 

12; 

Vers . 

2 

- DSS - ZWRITE 

Unit 

73; 

Vers . 

3 

- DSS - ZREAD 

Unit 

7  o . 

Ve  r  s . 

0 

. :>£l~ - 2  WRITE 

Unit 

71. 

Vers. 

i 

//BEND/STOR-PNLTY_EDT//SEP/EXMPLl/ 

//BEND/STOR-PNLTY_EDT//OCT// 

//BEND/STOR-PNLTY_EDT//OCT/EXMPLl/ 

/ /BEND / STOR- PNLTY_EDT / /MAR/ / 
//BEND/STOR-PNLTYJBDT//NOV/EXMPL1/ 
//BEND/STOR-PNLTY_EDT//DEC// 
//BEND/STOR-PNLTY  EDT//DEC/EXMPL1/ 

/ / OAHE/EVAP  RATE/ftl JAN1960/1MON// 

/ /bend-ftra7flon-pnlty_hpe_edt// / / 
//BEND-BENDR/FLOW-PNLTY_HPE_EDT//JAN/EXMPLl/ 
/  /  BEND  -  BENDR/FLOW-  P NLT  Y_HP  E_EDT  /  /  FEB  /  EXMPLl  / 
//BEND-BENDR/FLOW-PNLTY_HPE_EDT//MAR/EXMPLl/ 
/ /BE  ND-BENDR/FLOW-PNLTY_RPE_EDT/ /APR /EXMPLl/ 
//BEND-BENDR/FLOW-PNLTY_HPE_EDT/  /MAY /EXMPLl/ 
/  /  BEND  -  BENDR/FLOW-  P  NLT  Y_HP  E_EDT  /  /  JUN  /  EXMPL 1  / 
//BEND-BENDR/FLOW-PNLTY_HPE_EDT// JUL/EXMPL1/ 
//BEND-BENDR/FLOW-PNLTY_HPE_EDT//AUG/EXMPLl/ 
//BEND-BENDR/FLOW-PNLTY_!IPE_EDT// SEP /EXMPLl/ 
/ /BEND -BENDR/FLOW-PNLT  Y__HPE_EDT/ /OCT /EXMPLl/ 
/  /BEND-BENDR/FLOW-PNLTY_HPE  EDT//NOV/EXMPL1  / 
//BEND-BENDR/FLOW-PNLTY_HPE~EDT/ /DEC /EXMPLl/ 

//bend-ftra/flow-pnlty_edt/7jan// 

/ /BENDR-FTRA/FLOW-PNLTY_EDT/ / JAN/EXMPL1/ 
//BENDR-FTRA/FLOW-PNLTY_EDT/ /FEB/EXMPLl / 
//BENDR-FTRA/FLOW-PNLTY_EDT//MAR/EXMPLl/ 
//BEND-FTRA/FLOW-PNLTY_EDT//APR// 
//BENDR-FTRA/FLOW-PNLTY_EDT//APR/EXMPLl/ 

/  /BEND-FTRA/FLOW-PNLTY_EDT  /  /MAY/  / 

/  /BENDR-FTRA/FLOW-PNLT  Y_EDT  /  /MAY  /EXMPLl  / 

/  /BENDR-FTRA/FLOW-PNLTY_EDT  /  /  JUN  /  EXMPLl  / 
//BEND-FTRA/FLOW-PNLTY_EDT//JUL/  / 
//BENDR-FTRA/FLOW-PNLTY_EDT/  /  JUL/EXMPLl  / 
//BEND-FTRA/FLOW-PNLTY_EDT//AUG// 
//BENDR-FTRA/FLOW-PNLTY_EDT//AUG/EXMPLl/ 
//BEND-FTRA/FLOW-PHLTY_EDT//SEP// 

/  /BENDR-FTRA/FLOW-PNLTY_£DT/  /  SEP /EXMPLl  / 
//BEND-FTRA/FLOW-PNLTY_EDT//OCT// 
//BENDR-FTRA/FLOW-PNLTY_EDT//OCT/EXMPLl/ 
//BEND-FTRA/FLOW-PNLTY_EDT//JAN// 

//bendr-ftra/flow-pnlty_edt//nov/exmpli/ 

//BENDR-FTRA/FLOW-PNLTY  EDT//DEC/EXMPL1/ 

/ /FTRA/FLOW  LOC/01JAN19?0/1MON// 


000  SUMNEG:  -0 . 520000E+02 


//FTRA/STOR-PNLTY_EDT/  /  JAN/  / 
//FTRA/STOR-PNLTY_EDT// JAN/ EXMPLl/ 
//FTRA/STOR-PNLTY_EDT//FEB/EXMPLl/ 

//ftra/stor-pnlty_edt//mar/exmpli/ 

//FTRA/STOR-PNLTY_EDT//APR// 

//FTRA/STOR-PNLTY_EDT//APR/EXMPLl/ 

/  /FTRA/STOR-PNLTY_EDT  /  /MAY/  / 

/ /FTRA/STOR-PNLTY  EDT//MAY/EXMPL1/ 
//FTRA/STOR-PNLTY~EDT//JUN// 
//FTRA/STOR-PNLTY  EDT//JUN/EXMPL1/ 

/ /FTRA/ STOR-PNLTY~EDT  /  /  JUN  /  / 
//FTRA/STOR-PNLTY“EDT// JUL/EXMPLl/ 
//FTRA/STOR-PNLTY~EDT//AUG// 
//FTRA/STOR-PNLTY  EDT/ /AUG /EXMPLl/ 

/ /FTRA/ STOR-PNLTY“EDT/ /SEP / / 
//FTRA/STOR-PHLTY_EDT/ /SEP /EXMPLl/ 

/  /FTRA/STOR-PNLTY_EDT/  /MAY/  / 
//FTRA/STOR-PNLTY_EDT//OCT/EXMPLl/ 
//FTRA/STOR-PNLTY_EDT//NOV// 
//FTRA/STOR-PNLTY_EDT/ /NOV/EXMPL1/ 
//FTRA/STOR-PNLTY_EDT//JAN// 
//FTRA/STOR-PNLTY  EDT//DEC/EXMPL1/ 
//FTRA/EVAP  RATE/71JAN1960/1MON// 

/  /ftra-gapt7flow-pnlty_hpe_edt/  III 

/ /FTRA-FTRAR/FLOW-PNLTY_HPE_EDT// JAN/ EXMPLl/ 
//FTRA-FTRAR/FLOW-PNLTY_HPE_EDT//FEB/EXMPLl/ 
/  /FTRA-FTRAR/FLOH-PNLTY_HPE_EDT/  /MAR/ EXMPLl  / 
//FTRA-FTRAR/FLOW-PNLTY_HPE_EDT//APR/EXMPLl/ 
//FTRA-FTRAR/FLOW-PNLTY_HPE_EDT/ /MAY /EXMPLl/ 
//FTRA-FTRAR/FLOW-PNLTY_HPE_EDT/ /JUN /EXMPLl/ 
//FTRA-FTRAR/FLOW-PNLTY_HPE_EDT/ /JUL/EXMPLl/ 
/  /FTRA-FTRAR/FLOW-PNLTY_HPE_EDT/  /AUG/ EXMPLl  / 
/  /FTRA-FTRAR/FLOW-PNLTY_HPE_EDT/  /SEP  /EXMPLl  / 
//FTRA-FTRAR/FLOW-PNLTY_HPE_EDT/ /OCT /EXMPLl/ 
//FTRA-FTRAR/FLOW-PNLTY_HPE_EDT/ /NOV /EXMPLl / 
//FTRA-FTRAR/FLOW-PNLTY_HPE  EDT//DEC/EXMPL1/ 

//ftra-gapt/flow-pnlty_edt/7jan// 

/ /FTRAR-GAP  T  /  FLOW-PNLTY_EDT  /  /  JAN /E  XMP  Ll  / 
//FTRAR-GAPT/FLOW-PNLTY_EDT/ /FEB/EXMPLl/ 

/ /FTRAR-GAPT/FLOW-PNLTY_EDT /  /MAR /EXMPLl  / 
//FTRA-GAPT/FLOW-PNLTY_EDT/ 'APR  - / 
//FTRAR-GAPT/FLOW-PNLTY_EDT/ /APR/ EXMPLl / 

/  /  FTRA -G APT /FLOW- PNLTY_ECT  '  JV:*  ■ 

/  /  FTRAR-GAPT/FLOW-PtJLTY  EDT  '  /MV  I  1  - 
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- DSS- 

— Z WRITE 

Unit 

73; 

V«r». 

3; 

- DSS- 

—  ZREAD 

Unit 

72; 

Vera. 

2; 

- DSS- 

—Z  WRITE 

Unit 

73; 

Vera. 

3: 

- DSS- 

—  ZREAD 

Unit 

72; 

Vera. 

2: 

- DSS- 

— Z WRITE 

Unit 

73; 

Vera. 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS- 

— ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

—  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS- 

—  ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

--  ZREAD 

Unit 

71; 

Vers . 

1: 

- DSS- 

—  ZREAD 

Unit 

72; 

Vers . 

1: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3; 

- Dsr- 

—  ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers . 

1: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

—  ZREAD 

Unit 

72; 

Vers . 

1: 

- DSS- 

—  ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers. 

1: 

- DSS- 

—  ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

—  ZREAD 

Unit 

72; 

Vers . 

1: 

- DSS- 

—  ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers . 

1; 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers. 

3; 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers . 

1: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

—  ZREAD 

Unit 

72; 

Vers. 

1: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

—  ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

—  ZWRITE 

Unit 

73; 

V«rs. 

3; 

- DSS- 

—  ZREAD 

Unit 

71; 

Vers . 

2: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS- 

—  ZWRITE 

Unit 

73; 

Vers . 

3: 

--ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS- 

—ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

—  ZWRITE 

Unit 

73; 

Vers. 

3: 

--ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

—  ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

—  ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS- 

—  ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

—  ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

—  ZREAD 

Unit 

72; 

Vera . 

2: 

- DSS- 

—  ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers. 

3: 

—  ZREAD 

Unit 

72; 

Vera . 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3; 

- DSS- 

—  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

—  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3; 

- DSS- 

--  ZREAD 

Unit 

72; 

Vera. 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vera. 

3: 

- DSS- 

--  ZREAD 

Unit 

71; 

Vers . 

1: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3; 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers . 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers . 

2; 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers. 

3: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

. DSS- 

--  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers. 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

. DSS- 

--  ZREAD 

Unit 

72? 

Vers. 

2: 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers . 

3: 

- DSS- 

--  ZREAD 

Unit 

72; 

Vers. 

2 : 

- DSS- 

--ZWRITE 

Unit 

73; 

Vers. 

3: 

. DSS- 

--  ZREAD 

Unit 

71; 

Ve  i  s . 

1: 

- DSS- 

--  ZREAD 

Unit 

70  • 

Ve  r  s . 

2 : 

. DSS- 

--Z WRITE 

■?:t  it 

~  ; 

7-r  r  s  . 

//FTRAR-GAPT/FLOW-PHLTY  EDT//JUN/EXKPL1/ 
//ftra-gapt/flow-pnlty_Edt//jul// 

/ /FTRAR-GAPT/FLOW-PNLTY_EDT// JUL/EXMPL1/ 
//FTRA-GAPT/FLOW-PNLTY_EDT//AUG/ / 

/ /FTRAR-GAPT/FLOW-PHLTY_EDT//AUG/EXMPLl/ 
//FTRA-GAPT/FLOW-PNLTY_EDT//SEP// 

/ /FTRAR-GAPT/FLOW-PKLTY_EDT  /  /  SEP  /EXMPL1  / 

/  /  FTRA-GAPT/FLOK-PNLTY_EDT  /  /OCT  /  / 
//FTRAR-GAPT/FI^W-PNLTY_EDT/ /OCT/EXMPL1/ 
//FTRA-GAPT/FLOW-PNLTY_EDT/ /JAN// 
//FTRAR-GAPT/FLOW-PNLTY_EDT/ /NOV/EXMPL1/ 
//FTRAR-GAPT/FLOH-PNLTY  EDT//DEC/EXMPL1/ 
//GAPT/FLOH  LOC/01JAN1950/1MON// 
//GAPT/STOR-PHLTY_EDT//JAN// 

/ /GAPT/STOR-PNLTY_EDT// JAN/EXMPL1  / 
//GAPT/STOR'PHLTY_EDT//FEB/EXMPLl/ 

/ /GAPT/STOR-PHLTY_EDT  /  /MAR/  / 

/ /GAPT/STOR*PHLTY_EDT//MAR/EXMPLl/ 

//GAPT/STOR-PHLTY_EDT//APR// 

//GAPT/STOR-PNLTYJSDT//APR/EXMPL1/ 

//GAPT/STOR-PNLTY_EDT//MAY// 

//GAPT/STOR-PNLTY_EDT//MAY/EXMPLl/ 

//GAPT/STOR-PNLTY_EDT//JUN/EXMPLl/ 

//GAPT/STOR-PNLTY_EDT//JUL// 

//GAPT/STOR-PNLTY_EDT/ /  JUL/EXMPL1/ 

//GAPT/STOR-PNLTY_EDT//AUG// 

//GAPT/STOR-PMLTY_EDT//AUG/EXMPLl/ 

/ /GAPT/ STOR-PNLTY_EDT / /MAR/ / 

/  /GAP  T  /  STOR-  P  HLT Y_EDT  /  /  SEP /EXMPL1  / 
//GAPT/STOR-PKLTY_EDT//JAN// 
//GAPT/STOR-PKLTY_EDT//OCT/EXMPL1/ 
//GAPT/STOR-PNLTY_EDT//NOV/EXMPLl/ 
//GAPT/STOR-PKLTY  EOT//DEC/EXMPL1/ 
//GAPT/EVAP_RATE/7l  JAN1 960/1MOH/  / 
//6APT-SUX/FLOW-PNLTY_HPE_EDT//// 
//GAPT-GAPTR/FLOW-PNLTY_HPE_RDT//JAN/EXMPLl/ 
//GAPT-GAPTR/FLOW-PNLTYHPEEDT//FEB/EXMPL1/ 
//GAPT-GAPTR/FLOW-PHLTY_HPE_EDT//MAR/EXMPLl/ 
//GAPT-GAPTR/FLOW-PNLTY_HPE_EDT/ /APR/EXMPL1/ 
//GAPT-GAPTR/FLOW-PNLTY_HPE_EDT//MAY/EXMPLl / 
/  /GAPT-GAPTR/FLOW-PNLTY_HPE_EDT/ /JUN/EXMPL1  / 
/  /GAPT-GAPTR/FLOW-PNLTYHPEEDT/  /  JUL/EXMPL1  / 
//GAPT-GAPTR/FLOH-PNLTYHPEEDT//AUG/EXMPL1/ 
//GAPT-GAPTR/FL0W-PNLTYHPEEDT//SEP/EXMPL1/ 
//GAPT-GAPTR/FLOW-PNI,TY_HPE_EDT/ /OCT/EXMPL1  / 
//GAPT-GAPTR/FLOW-PNLTY  HPE_EDT/ /NOV/EXMPL1/ 
/  /GAPT-GAPTR/FL0W-PNLTY“HPE_EDT//DEC/EXMPL1  / 
/ /GAPT-SUX/FLOW-PNLTY_EDT/ /JAN/ / 
//GAPTR-SUX/FLOW-PNLTY  EDT//JAN/EXMPL1  / 
//GAPTR-SDX/FLOW-PNX.TYEDT//FEB/EXMPL1  / 
//GAPTR-SUX/FLOW-PNLTYEDT/ /MAR/EXMPL1  / 
//GAPT-SUX/FLOW-PNLTY_EDT//APR// 
//GAPTR-SUX/FLOW-PNLTY_EDT/ /APR/EXMPL1/ 
//GAPT-SUX/FLOW-PNLTY_EDT//MAY// 

/ /GAPTR-SOX/FIJOW-PRLTY_EDT/ /MAY /EXMPL1  / 
//GAPTR-SOX/FLOK-PNLTY_EDT//JUN/EXMPL1/ 
//GAPT-SDX/FLOH-PNLTY_EDT//JUL// 

/ /GAPTR-SUX/FLOH-PNLTY_EDT/ /JUL/EXMPL1/ 

//GAPT-SOX/FLOW-Pm,TY_EDT//AUG// 

//GAPTR-SOX/FLOM-PNLTY_EDT//AOG/EXMPLl/ 

/  /GAPT-SOX/FLOM-PttLTY_EDT/ /SEP  /  / 
//GAPTR-StJX/FLOW-PMLTY_EDT//SEP/EXMPLl/ 
//GAPT-SOX/FLOH-PNLTY_EDT//OCT// 
//GAPTR-SOX/FLOH-PNLTY  EDT/ / OCT/EXMPL1 / 
//GAPT-SUX/FLOW-PNLTY_EDT//JAN// 

/  /GAPTR-SUX/FLOW-PNLTY_EDT/ /NOV/EXMPL1  / 

/  / GAP TR -SUX/ FLOW- PNLTY  EDT/  /DEC/EXMPL1  / 
//SOX/FLOM  LOC/01JAN19"?0/1MON/ / 
//SDX-OMA/FLOM-PNLTY_EDT/ / JAN/ / 
//SOX-OMA/FLOW-PNLTY_EDT//JAN/EXMPL1/ 
//StJX-OMA/FLOM-PNLTY_EDT/ /FEB/EXMPL1  / 

/  /SOX-OMA/FLOW-PHLTY_EDT/  /MAR/EXMPH  / 

//SDX-OMA/FLOK-PNLTY_EDT//APR// 

//SOX-OMA/FLOH-PNLTY_EDT//APR/EXMPLl/ 

//SUX-OMA/FLOM-PNLTY_EDT//MAY// 

//SDX-OMA/FLOW-PNLTY_EDT//MAY/EXMPLl/ 

//SOX-OMA/FLOM-PNLTY_EDT//JUN// 

/ /SjX-0MA/FL0M-PNLTY_EDT/ / JUN/EXMPLl / 

//SUX-OMA/FLOM-PNLTY_EDT//JUL// 

//SUX-OMA/FLOW-PNLTY_EDT//JUL/EXMPL1/ 

/  /  SUX -OMA/FLOW - P NLT Y_EDT /  /  AUG /  EXMP LI  / 

/ /SUX-OMA/FLOW-PNLTY_EDT/ /SEP / / 
//SUX-OMA/FLOW-PNLTY_EDT//SEP/EXMPLl/ 

/ /SUX-OMA/FLO«-PHLTY_EDT/ /OCT/ / 
//SUX-OMA/FLOW-PNLTY_EDT/ /OCT/EXMPL1 / 
//SUX-OMA/FLOW-PNLTY_EDT//NOV// 

/  /SUX-OMA/FLOW-PNLTY_EDT/ /NOV/EXMPL1  / 
//SUX-OMA/FLOH-PNLTY_EDT/ /DEC// 
//SUX-OMA/FLOW-PNLTY_EDT//DEC/EXMPLl / 
//OMA/FLOW  L‘0C/01  JAN1  960/  1MOH / / 

>  /oma-hcme'7flom-phlty_edt//jah/  > 

••/-MA-t)CIIE'FL:W-PHLTY  EDT'/JAII/F.XXPLl 
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- DSS— 

•ZWRITE 

Unit 

73i 

Vara. 

3 

- DSS  — 

-ZWRITE 

Unit 

73/ 

V«r*. 

3 

- OSS-- 

•  ZREAD 

Unit 

72; 

V#r*. 

2 

- DSS— 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS— 

-ZWRITE 

Unit 

73; 

Vara. 

3 

. DSS— 

-ZWRITE 

Unit 

73; 

Vera. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vera. 

3 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vera. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vera. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

71; 

Vara. 

1 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vera. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS— 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

71; 

Vara. 

1 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS— 

-ZWRITE 

Unit 

73; 

Vere. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Ver». 

3 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS— 

-ZWRITE 

Unit 

73; 

Vere. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vere. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vere. 

2: 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vere. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vere. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vere. 

2 

- DSS— 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vere. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vere. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS— 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vere. 

3 

- DSS— 

-  ZREAD 

Unit 

71; 

Vara. 

1 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS— 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS— 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS— 

-  ZREAD 

Unit 

72; 

Vere. 

2 

- DSS— 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS— 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS— 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS— 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vere. 

3 

- DSS— 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS— 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vere. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS— 

-  ZREAD 

Unit 

71; 

Vere. 

1 

- DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS— 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- -  -DSS  — 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS  — 

-ZWRITE 

Unit 

73; 

Vara. 

3 

- DSS-- 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS- - 

-ZWRITE 

Unit 

73; 

Vers. 

3 

- DSS- - 

-  ZREAD 

Unit 

72; 

Vara. 

2 

- DSS-- 

-ZWRITE 

Unit 

73; 

Vere . 

3 

- DSS- - 

-  ZREAD 

Unit 

72; 

Vara. 

2 

. DSS-- 

-ZWRITE 

Unit 

73/ 

Vers . 

3 

- DSS- - 

-ZWP.ITE 

Unit 

73; 

Vers . 

3 

. DSS- - 

-ZWRITE 

Unit 

73/ 

Vers . 

3 

- DSS- - 

-  ZREAD 

Unit 

72; 

Vers. 

2 

- DSS- - 

-ZWP.ITE 

Unit 

73; 

Vers . 

3 

. DSS- - 

-  ZREAD 

T»ni  t 

72; 

Vers. 

2 

//OMA-NCNE/FLOW-PNLTY_EDT/ /FEB/EXMPLl/ 
//OMA-NCNE/FLOW-PNLTY_EDT//MAR/EXMPLl/ 
//OMA-NCNE/FLC**-PNLTY_EDT//APR// 

/  /OMA-NCNE  /  FLOW-PNLT  Y_EDT  /  / APR/ EXMPL1  / 
//OMA-NCNE/FLON-PNLTY_EDT//MAY/EXMPLl/ 

/  /OMA-NCNE/FLOW-PNLTYEDT/  /  JUN/EXMPL1  / 
//OMA-NCNE/FLOW-PNLTY_EDT/ /  JUL/EXMPL1  / 
//OMA-NCNE/FLOW-PNLTY_EDT//AOG/EXMPLl/ 
//OMA-NCNE/FLOW-PNLTY_EDT//SEP/EXHPL1/ 
//OMA-NCNE/FLOW-PNLTY__EDT/ /OCT/EXMPLl/ 
//OHA-NCNE/FLOW-PNLTY_EDT//NOV/EXMPLl/ 
//OMA-NCNE/FLOW-PNLTY_EDT/ / JAN/ / 
//OMA-NCNE/FLOW-PNLTY  EDT//DEC/EXMPL1/ 

/  /  HONE  /  FLOW_LOC  /  0 1  JANl 9  6 0  / 1 MON  /  / 
//NCNE-MKC/FLOW-PNLTY_EDT//JAN// 

/ /NONE -MKC / FLOW - PNLTY_EDT // JAN / EXMP LI / 

/ /NCNE-MKC/FLOW-PNLTY_EDT/ /FEB/EXMPL1 / 

/ /NCNE-MKC/FLOW-PNLTY_EDT/ /MAR/EXMPL1/ 

//NCNE-MKC/FLOW-PNLTY_EDT//APR// 

//NCNE-MKC/FLOW-PNLTY_EDT//APR/EXMPLX/ 

/ /NCNE-MKC/FLOW-PNLTY_EDT/ /MAY/EXMPL1  / 

/  /NCNE-MKC/FLOW-PNLTY_EDT/  /  JUN/EXMPL1  / 

/ /NONE -MKC /FLOW- PNLTY_EDT//JUL// 
//NCNE-MKC/FLOW-PNLTY_EDT/ /JUL/EXMPL1/ 
//NCNE-MKC/FLCW-PNLTY_EDT/  /AUG/EXMPL1/ 
//NCNE-MKC/FLOW-PNLTY_EDT//SEP/EXMPLl/ 
//NCNE-MKC/FLOW-PNLTY_EDT//OCT// 
//NCNE-MKC/FLOW-PNLTY_EDT/ /OCT/EXMPLl/ 
//NCNE-MKC/FLOW-PNLTY_EDT//NOV/EXMPLl/ 
//NCNE-MKC/FLOW-PNLTY_EDT//DEC// 
//NCNE-MKC/FLOW-PNLTY  EOT/ /DEC/EXMPL1/ 

/ /MKC/FLOW  LOC/01JAN1'560/1MON// 
//mkc-bnmo7flow-pnlty_edt//jan// 

//MKC-BNMO/FLOW-PNLTY_EDT/ /  JAN/EXMPL1/ 

/ /MKC-BNMO/FLOW-PNLTY_EDT/ /FEB/EXMPLl / 
//MKC-BNMO/FLOW-PNLTY_EDT/ /MAR// 

/  /MKC-BNMO/FLOW-PNLTYEDT/  /MAR/EXMPL1  / 
//MKC-BNMO/FLOW-PNLTY_EDT//APR// 
//MKC-BNMO/FLOW-PNLTYEDT//APR/EXMPL1/ 
//MKC-BNMO/FLOW-PNLTY_EDT//MAY// 

/  /MKC-BHMO/FLOW-PNLTY_EDT/  /KAY/EXMPL1  / 

/  /MKC- BNMO/ FLOW-PNLT  Y_EDT  /  /  JUN/ / 
//MKC-BNMO/FLOW-PNLTYEDT//JON/EXMPL1/ 

/  /MKC-BNMO/FLOW-PNLTYEDT/  /  JUL/  / 

/  /MKC-BNMO/FLOW-PNLTY_EDT/  /  JUL/EXKPL1  / 

/  /MKC-BNMO/FUJW-P«LTY_EDT  /  /AUG /EXMP  LI  / 
//MKC-BNMO/FLOW-PNLTY  EDT//SEP// 
//MKC-BNMO/FLOW-PNLTY~EDT//SEP/EXMPLl/ 
//MKC-BNMO/FLOW-PNLTYEDT//OCT// 

/  /MKC-BNMO/FLOW-PNLTY_EDT/ /OCT/EXMPLl  / 

//MKC-BNMO/FLOW-PNLTY_EDT//NOV// 

//MKC-BNMO/FLOW-PNLTY_EDT//NOV/EXMPLl/ 

/ /MKC -BNMO/ FLOW-P  NLTY_EDT // DEC  /  / 
//MKC-BNMO/FLOW-PNLTY  EDT//DEC/EXMPL1/ 
//BNMO /FLOW  LOC/01 JANT960/1MON// 

//bhmo-hemo7flow-pnlty_edt//jan// 

//BHMO-HEMO/rLOW-PNLTY_EDT//JAN/EXMPLl/ 
/  /BNMO-HEMO/FLOW-PNLTYEDT/ /FEB/EXMPLl/ 
//BNMO-HEMO/FLOW-PNLTY  EDT//MAR/EXMPL1/ 
//BHMO-HEMO/FLOW-PNLTYEDT//APR// 

/  /BNMO-HEMO/FLOW-PNLTYEDT/  /APR/EXMPL1/ 
//BNMO-HEMO/FLOW-PNLTY  EDT//MAY// 

/  /BNMO-HEMO/FLOW-PNLTY~EDT/  /MAY/EXMPL1  / 
//BNMO-HEMO/FLOW-PNLTY  EDT//JUN// 
//BNMO-HEMO/FLOW-PNLTY~EDT//JUN/EXMPL1/ 
//BNMO-HEMO/FLOW-PNLTY  EDT//JOL// 
//BNMO-HEMO/FLOW-PNLTY- EDT/ / JUL/ EXMP LI / 
/ /BNMO-HEMO/FLOW-PNLTY- EDT/ /AUG/EXMPL1/ 
//BNMO-HEMO/FLOW-PNLTY  EDT//SEP/EXMPL1/ 
/ /BNMO-HEMO/FLOW-PNLTY- EDT/ /OCT/ / 

/  /BNMO-HEMO/FLOW-PNLTY_EDT/  /OCT/EXMPLl  / 
/ /BNMO-HEMO/FLOW-PNLTY_EDT/ /NOV/ / 

/  /BNMO-HEMO/FLOW-PNLTY_EDT  /  /NOV/EXMPL1  / 
//BNMO-HEMO/FLOW-PNLTY  EDT//DEC/EXMPL1/ 
/ / HEMO / FLOW_LOC / 0 1 J AN 1 5 6 0 / 1 MON / / 
//HEMO-STL/FLOW-PNLTY_EDT//JAN// 
//HEMO-STL/FLOW-PNLTY_EDT/ / JAN/EXMFL1/ 
//HEMO-STL/FLOW-PNLTY_EDT/ /FEB/EXMPLl/ 

/ /HEMO-STL/FLOW-PNLTY_EDT/  /MAR/EXMPL1/ 
//HEMO-STL/FLOW-PNLTY_EDT/ /APR/ / 
//HEMO-STL/?'LOW-PNLTY_EDT/ /APR/EXMPL1/ 

/ / HEMO- STL/FLOW-PNLTY_EDT //MAY/ / 

/ /HEMO-STL/FLOW-PNLTY_EDT/ /MAY /EXMPL1/ 
//HEMO-STL/FLOW-PNLTY_EDT//JUN// 
//HEMO-STL/FLOW-PNLTY_EDT//JUN/EXMPLl/ 
//HEMO-STL/FLOW-PNLTY_EDT//JUL// 
//HEMO-STL/FLOW-PNLTY_EDT// JUL/EXMPLl / 

/ /HEMO-STL/FLOW-PNLTY_EDT / / AUG/EXMPL1 / 
//HEMO-STL/FLOW-P(ILTY_EDT '  /SEP/EXMPL1/ 

/ /HEMO-STL/FLOW- PNLTYEDT / / OCT / / 
//HEMO-STL/FLOW-FtILTY  EFT  'TCT/EXKPLl/ 

/ /HEMO-STL/FLOW-PNLTY  ET T ■  ■ NOV ' / 
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ZWRXTE  Unit  73;  Vera 
ZWRXTE  Unit  73;  Vera 
ZREAD  Unit  72;  Vers 
ZWRXTE  Unit  73;  Vers 
'ZWRXTE  Unit  73;  Vera 
■ZWRXTE  Unit  73;  Vers 
■ZWRXTE  Unit  73;  Vera 
■ZWRXTE  Unit  73;  Vers 
ZWRXTE  Unit  73;  Vers 
-ZWRXTE  Unit  73;  Vers 
■ZWRXTE  Unit  73;  Vera 
■ZWRXTE  Unit  73;  Vera 
•ZWRXTE  Unit  73;  Vers 
•ZWRXTE  Unit  73;  Vera 
■ZWRXTE  Unit  73;  Vers 


3:  //HEHO-STL/FLOW-PHLTY  EDT//NOV/EXHPL1/ 

3:  //HEMO-STL/FLOW-PHLTY_BDT//DEC/EXMPLl/ 

2:  //STL-S_SIKK/FXiOW-PHLTY_EDT/ /JAN/ / 

3:  //STL-S_SIWK/FL0W-PIH,TY_EDT//JAH/EXMPL1/ 

3:  / /STL-S_SIKK/FLOW-PWLTY_EDT/ /FEB/EXMPL1/ 

3:  //STL-S_SIKK/FLOW-PHI.TY_EDT/ /MAR/EXMPL1/ 

3:  //STL-S_Simc/FLOW-PWLTY_EDT//APR/EXMPLl/ 

3:  //STL-S_SIWK/FLOW-PHLTY_EDT//KAY/EXHPLl/ 

3:  //STL-S_SIHK/FLOW-PWLTY_EDT//JU»/EXMPU/ 
3:  //STL-S  SIKK/FLOW-PWLTY_EDT//JUL/EXMPLl/ 

3:  //STL-S~SIWK/FLOW-PHLTY_EDT/ /AUG/EXMPL1/ 

3:  //STL-S_SINK/FLOW-PSLTY_EDT//SEP/EM«PI,l/ 

3:  / /STL-S_SIKK/FLOW-PNLTY_EDT//OCT/EXMPL1/ 

3:  //STL-S_SINK/FLOW-PKLTY_EDT/ /NOV/EXMPL1/ 

3:  //STL-S  SINK/FLOW-PNLTYEDT//DEC/EXMPL1/ 


Exempt*  Umt  Input  and  Ou^Mit 


43  Links  in  this  system 

#  From  To  Type  Mult  Cost  Sum  Neg  Num  Neg  Description 


0  Link  to  balance  flow  throughout  computations 
0 


1  S  SOURCE 

S  SINK 

DIVR 

1.00000 

0.00 

0.0 

2  FTPS 

FTPK 

STOl 

1.00000 

0.00 

0.0 

3  GARR 

GARR 

STOl 

1.00000 

0.00 

0.0 

4  OAHE 

OAHE 

STOl 

1.00000 

0.00 

0.0 

5  BEND 

BEND 

STOl 

1.00000 

0.00 

0.0 

6  FTRA 

FTRA 

STOl 

1.00000 

0.00 

0.0 

7  GAPT 

GAPT 

STOl 

1.00000 

0.00 

0.0 

8  S  SOURCE 

FTPK 

I  NFL 

1.00000 

0.00 

0.0 

9  FTPK 

FTPK 

RSTO 

1.00000 

0.00 

0.0 

10  FTPK 

FTPKR 

HREL 

1.00000 

0.00 

0.0 

11  FTPKR 

GARR 

RREL 

1.00000 

0.00 

0.0 

12  S  SOURCE 

GARR 

I  NFL 

1.00000 

0.00 

0.0 

13  GARR 

GARR 

RSTO 

1.00000 

0.00 

0.0 

14  GARR 

GARRR 

HREL 

1.00000 

0.00 

0.0 

(energy) 

IS  GARRR 

OAHE 

RREL 

1.00000 

0.00 

0.0 

16  S  SOURCE 

OAHE 

I  NFL 

1.00000 

0.00 

-266.0 

17  OAHE 

OAHE 

RSTO 

1.00000 

0.00 

0.0 

18  OAHE 

OAHER 

HREL 

1.00000 

0.00 

0.0 

Reservoir  (energy) 

19  OAHER 

BEND 

RREL 

1.00000 

0.00 

0.0 

Reservoir 

20  BEND 

BEND 

RSTO 

1.00000 

0.00 

0.0 

21  BEND 

BENDR 

HREL 

1.00000 

0.00 

0.0 

Randall  Reservoir  (energy) 

22  BENDR 

FTRA 

RREL 

1.00000 

0.00 

0.0 

Randall  Reservoir 

23  S  SOURCE 

FTRA 

I  NFL 

1.00000 

0.00 

-52.0 

24  FTRA 

FTRA 

RSTO 

1.00000 

0.00 

0.0 

25  FTRA 

FTRAR 

HREL 

1.00000 

0.00 

0.0 

Point  Reservoir  (energy) 

26  FTRAR 

GAPT 

RREL 

1.00000 

0.00 

0.0 

point  Reservoir 

27  S  SOURCE 

GAPT 

INFL 

1.00000 

0.00 

0.0 

28  GAPT 

GAPT 

RSTO 

1.00000 

0.00 

0.0 

29  GAPT 

GAPTR 

HREL 

1.00000 

0.00 

0.0 

(energy) 

30  GAPTR 

SUX 

RREL 

1.00000 

0.00 

0.0 

31  S  SOURCE 

SUX 

INFL 

1.00000 

0.00 

0.0 

32  SUX 

OMA 

CHAN 

1.00000 

0.00 

0.0 

33  S  SOURCE 

OMA 

INFL 

1.00000 

0.00 

0.0 

34  OMA 

NONE 

CHAN 

l.ooooo 

0.00 

0.0 

35  S  SOURCE 

NCNE 

INFL 

1.00000 

0.00 

0.0 

36  NONE 

MKC 

CHAN 

1.00000 

0.00 

0.0 

37  S  SOURCE 

MKC 

INFL 

1.00000 

0.00 

0.0 

38  MKC 

BNMO 

CHAN 

1.00000 

0.00 

0.0 

39  S  SOURCE 

BNMO 

INFL 

1.00000 

0.00 

0.0 

40  BNMO 

HEMO 

CHAN 

1.00000 

0.00 

0.0 

41  S  SOURCE 

HEMO 

INFL 

1.00000 

0.00 

0.0 

42  HEMO 

STL 

CHAN 

1.00000 

0.00 

0.0 

now) 

43  STL 

S  SINK 

CHAN 

1.00000 

0.00 

0.0 

0 

0 

0 

0 

0 

0  Inflow  into  Fort  Peck  Reservoir 
0  Storage  in  Fort  Peck  Reservoir 
0  Hydropower  release  from  Ft.  Peck 
0  Release  from  Fort  Peck  Reservoir  to  Garrison 
0  Inflow  into  Garrison  Reservoir 
0  Storage  in  Garrison  Reservoir 
0  Release  from  Garrison  Reservoir  to  Oahe 

0  Release  from  Garrison  Reservoir  to  Oahe 
3  Inflow  into  Oahe  Reservoir 
0  Storage  in  Oahe  Reservoir 
0  Release  from  Oahe  Reservoir  to  Big  Bend 

0  Release  from  Oahe  Reservoir  to  Big  Bend 

0  Storage  in  Big  Bend  Reservoir 
0  Release  from  Big  Bend  Reservoir  to  Fort 

0  Release  from  Big  Bend  Reservoir  to  Fort 

2  Inflow  into  Fort  Randall  Reservoir 
0  Storage  in  Fort  Randall  Reservoir 
0  Release  from  Fort  Randal  Reservoir  to  Gavins 

0  Release  from  Fort  Randal  Reservoir  to  Gavins 

0  Inflow  into  Gavins  Point  Reservoir 
0  Storage  in  Gavins  Point  Reservoir 
0  Release  from  Gavins  Point  to  Sioux  City 

0  Release  from  Gavins  Point  to  Sioux  City 
0  Inflow  to  Sioux  City 
0  Channel  from  Sioux  City  to  Omaha 
0  Inflow  to  Omaha 

0  Channel  from  Omaha  to  Nebraska  City 
0  Inflow  to  Nebraska  City 

0  Channel  from  Nebraska  City  to  Kansas  City 
0  Inflow  to  Kansas  City 

0  Channel  from  Kansas  City  to  St.  Louis 
0  Inflow  to  Boonville 
0  Channel  from  Boonville  to  Hermann 
0  Inflow  to  Hermann 

0  Channel  from  Hermann  to  St.  Louis  (Sink  for 
0  Channel  from  St.  Louis  to  the  Super  Sink 
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{ Print  parameters  and  network  solver  matrix  before  solution} 


Parameters  associated  with  the  Network  Solver 


SOURCE  SINK 

1  2 

NARC  NODES 

1071  230 

IFS  I ROOT 

0  0 

NDEG  NLOP 

0  0 

ITER 

0 

NPRIT 

0 

IPRINT 

0 

OUTFLO 

126749.00000 

FLONET 

0.00000 

CSTNOW 

0.00000 

TOTCST 

0.00000 

ppc 

0.00001 

BIG 

1000000.00000*- 

SICH 

TIMAX 

0.00000 

TIME 

0.00001 

OUTFLO 

0 . 1267490E+06 

FLONET 

O.OOOOOOOE+OO 

CSTNOW 

O.OOOOOOOE+OO 

TOTCST 

O.OOOOOOOE+OO 

EPS 

0 . 1000000E-04 

BIG 

0 .  lOOOOOOE-f  07 

SICH 

0. 1000000E+11 

TIMAX 

O.OOOOOOOE+OO 

TIME 

0 . 1000000E-04 
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* 

I  ARC 

JARC 

LOWER 

UPPER 

COST 

AMP 

FLOW 

COST 

1 

1 

2 

0.00 

126749.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

2 

1 

3 

13900.00 

13900.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

3 

1 

5 

15605.00 

15605.00 

0.0000000E+00 

1.0000 

0.00 

0.000000 

4 

1 

7 

17739.00 

17739.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

5 

1 

9 

1730.00 

1730.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

6 

1 

11 

3473.00 

3473.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

7 

1 

13 

357.00 

357.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

8 

1 

3 

722.00 

722.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

9 

1 

22 

1197.00 

1197.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

10 

1 

41 

1429.00 

1429.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

11 

1 

60 

1790.00 

1790.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

13 

1 

79 

1323.00 

1323.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

13 

1 

99 

667.00 

667.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

14 

1 

117 

714.00 

714.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

15 

1 

136 

1064.00 

1064.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

16 

1 

155 

819.00 

819.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

17 

1 

174 

497.00 

497.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

18 

1 

193 

465.00 

465.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

19 

1 

212 

445.00 

445.00 

O.OOOOOOOE+OO 

1.0000 

0.00 

0.000000 

30 

3 

22 

4211.00 

10782.61 

-0.2051292E+03 

1.0000 

0.00 

-205.129200 

21 

3 

22 

0.00 

4289.86 

-0. 1234102E+03 

1.0000 

0.00 

-123.410200 

22 

3 

22 

0.00 

1594.20 

-0 . 1844921E+02 

1.0000 

0.00 

-18.449210 

23 

3 

22 

0.00 

1047.33 

0 . 1383689E+03 

1.0000 

0.00 

138.368900 

24 

22 

41 

4211.00 

11130.43 

-0 . 2382582E+03 

1.0000 

0.00 

-238.258200 

25 

22 

41 

0.00 

3884.06 

-0 . 1191396E+03 

1.0000 

0.00 

-119.139600 

26 

22 

41 

0.00 

1565.22 

0 . 5010889E+01 

1.0000 

0.00 

5.010889 

27 

22 

41 

0.00 

1134.29 

0.1448219E+03 

1.0000 

0.00 

144.821900 

28 

41 

60 

4211.00 

11130.43 

-0.2382582E+03 

0.9983 

0.00 

-238.258200 

29 

41 

60 

0.00 

3884.06 

-0.1191396E+03 

0.9983 

0.00 

-119.139600 

30 

41 

60 

0.00 

1565.22 

0 . 5010889E+01 

0.9983 

0.00 

5.010889 

31 

41 

60 

0.00 

1134.29 

0 . 144821 9E+03 

0.9983 

0.00 

144.821900 

32 

60 

79 

4211.00 

11130.43 

-0.2382582E+03 

0.9988 

0.00 

-238.258200 

33 

60 

79 

0.00 

3884.06 

-0. 1191396E+03 

0.9988 

0.00 

-119.139600 

34 

60 

79 

0.00 

1565.22 

0 . 5010889E+01 

0.9988 

0.00 

5.010889 

35 

60 

79 

0.00 

1134.29 

0 . 144  8219E+03 

0.9988 

0.00 

144.821900 

36 

79 

98 

4211.00 

11072.46 

-0.3223391E+03 

0.9954 

0.00 

-322.339100 

37 

79 

98 

0.00 

3826.09 

-0.1358066E+03 

0.9954 

0.00 

-135.806600 

38 

79 

98 

0.00 

1652.17 

0. 1780186E+02 

0.9954 

0.00 

17.801860 

39 

79 

98 

o.oo 

1163.28 

0 . 2009804E+03 

0.9954 

0.00 

200.980400 

40 

98 

117 

4211.00 

11130.43 

-0.2382582E+03 

0.9951 

0.00 

-238.258200 

41 

98 

117 

0.00 

3884.06 

-0.1191396E+03 

0.9951 

0.00 

-119.139600 

42 

98 

117 

0.00 

1565.22 

0 . 5010889E+01 

0.9951 

0.00 

5.010889 

43 

98 

117 

0.00 

1134.29 

0 . 1448219E+03 

0.9951 

0.00 

144.821900 

44 

117 

136 

4211.00 

11043.48 

-0.2218894E+03 

0.9954 

0.00 

-221.889400 

45 

117 

136 

0.00 

3913.04 

-0. 113997 8E+03 

0.9954 

0.00 

-113.997800 

46 

117 

136 

0.00 

1594.20 

-0.8609623E+01 

0.9954 

0.00 

-8.609623 

47 

117 

136 

0.00 

1163.28 

0 . 1333886E+03 

0.9954 

0.00 

133.388600 

48 

136 

155 

4211.00 

11130.43 

-0.2382582E+03 

0.9968 

0.00 

-238.258200 

49 

136 

155 

0.00 

3884.06 

-0. 1191396E+03 

0.9968 

0.00 

-119.139600 

50 

136 

155 

0.00 

1565.22 

0 . 5010889E+01 

0.9968 

0.00 

5.010889 

51 

136 

155 

0.00 

1134.29 

0.1448219E+03 

0.9968 

0.00 

144.821900 

52 

155 

174 

4211.00 

11043.48 

-0.2218894E+03 

0.9971 

0.00 

-221.889400 

53 

155 

174 

0.00 

3913.04 

-0.1139978E+03 

0.9971 

0.00 

-113.997800 

54 

155 

174 

0.00 

1594.20 

-0.8609623E+01 

0.9971 

0.00 

-8.609623 

55 

155 

174 

0.00 

1163.28 

0. 1333886E+03 

0.9971 

0.00 

133.388600 

56 

174 

193 

4211.00 

10956.52 

-0. 1916667E+03 

0.9988 

0.00 

-191.666700 

57 

174 

193 

0.00 

3768.12 

-0 . 101 9909E+03 

0.9988 

0.00 

-101.990900 

58 

174 

193 

0.00 

1913.04 

-0 . 3587343E+02 

0.9988 

0.00 

-35.873430 

59 

174 

193 

0.00 

1076.32 

0 . 1150001E+03 

0.9988 

0.00 

115.000100 

60 

193 

212 

4211.00 

10782.61 

-0.2051292E+03 

1.0000 

0.00 

-205.129200 

{additional  output  deleted} 


1038 

70 

2 

0.00 

9492.75 

0 . 4750994E+03 

1.0000 

0.00 

475.099400 

1030 

78 

2 

0.00 

980760.90 

0 . 2321 544E+04 

1.0000 

0.00 

2321.544000 

1040 

97 

2 

0.00 

326.09 

-0 . 1 827529E+08 

1.0000 

0.00*** 

*********** 

1041 

97 

2 

0.00 

9420.29 

0. 4246154E+01 

1.0000 

0.00 

4.246154 

104  2 

97 

2 

0.00 

9492.75 

0 . 4750994E+03 

1.0000 

0.00 

475.099400 

1  0  4  3 

97 

2 

0.00 

980760.90 

0 . 2321544E+04 

1.0000 

0.00 

2321.544000 

1044 

lib 

2 

0.00 

326.09 

-0. 1827529E+08 

1.0000 

0.00*** 

*********** 

10  4  5 

116 

2 

0.00 

9420.29 

0.4246154E+01 

1.0000 

0.00 

4.246154 

'  *"*46 

116 

2 

0.00 

9492.75 

0 . 4 750994E  +  03 

1.0000 

0.00 

475.099400 

1  u  4  7 

lib 

2 

0.00 

980760 . 90 

0.2321544E+04 

1.0000 

0.00 

2321.544000 

H'48 

135 

2 

0.00 

326.09 

-0. 1827529E+08 

1.0000 

0.00*** 

104  9 

135 

2 

0.00 

9420.29 

0.4246154E+01 

1.0000 

0.00 

4.246154 

K>5u 

135 

2 

0.00 

9492.75 

0. 4750994E+03 

1.0000 

0.00 

475.099400 

1 " c.  1 

135 

2 

0.00 

980760.90 

0 . 232 1 54  4E  +  04 

1.0000 

0.00 

2321 . 544000 

]"r-  r 

1^4 

7 

0 . 00 

326.09 

-0. 1827529E+08 

1 . 0090 

f t  _  i)  0  *  *  * 

1  r-J 

7 

ft .  n  0 

9420.20 

o.  424  61 54E  + 01 

1  .  O0OO 

0 . 0  •' 

4.246154 

: !  ; 

9  4  °>2 .  _,5 

m  .  4  7  5<'aa4E  +  ''’3 

1  .  "firm 

4'7C  .  t'Oq^.'H't 

i  A 

98*  1 7 6* ■ .  9i ' 

4  "  1  ft 

'*4.'  "  . .  “• 

1  • . 232 1 54  4E  +  04 

-  \  r.“r;9r*.  r 

" .  47  l  c  4F.  ♦  '  •  I 

1  .f'.l-Mt 

'  !'■'  ••• 

:  '7  1 .544'iuu 

A  .  7 1  b  i £-  i 
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losa 

173 

2 

0.00 

9492.75 

0 . 4750994E+03 

1.0000 

0.00 

475.099400 

1059 

173 

2 

0.00 

980760.90 

0 . 2321544E+04 

1.0000 

0.00 

2321.544000 

1060 

192 

2 

0.00 

326.09 

-0 . 1827529E+O0 

1.0000 

0.00************** 

1061 

192 

2 

0.00 

9420.29 

0 . 4246154E+01 

1.0000 

0.00 

4.246154 

1062 

192 

2 

0.00 

9492.75 

0 . 4750994E+03 

1.0000 

0.00 

475.099400 

1063 

192 

2 

0.00 

980760.90 

0 . 2321544E+04 

1.0000 

0.00 

2321.544000 

1064 

211 

2 

0.00 

326.09 

-0. 1827529E+08 

1.0000 

o.oo******** ****** 

1065 

211 

2 

0.00 

9420.29 

0.4246154E+01 

1.0000 

0.00 

4.246154 

1066 

211 

2 

0.00 

9492.75 

0 . 4750994E+03 

1.0000 

0.00 

475.099400 

1067 

211 

2 

0.00 

980760.90 

0 . 2321544E+04 

1.0000 

0.00 

2321.544000 

1068 

230 

2 

0.00 

326.09 

-0. 1827529E+08 

1.0000 

0.00*' 

1069 

230 

2 

0.00 

9420.29 

0 . 42461 54E+01 

1.0000 

0.00 

4.246154 

1070 

230 

2 

0.00 

9492.75 

0.4750994E+03 

1.0000 

0.00 

475.099400 

1071 

230 

2 

0.00 

980760.90 

0 . 2321 544E  +  04 

1.0000 

0.00 

2321.544000 
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{Print  Network  matrix  after  solution} 


Parameters  associated  with  the  Network  Solver 


SOURCE 

1 

SINK 

2 

NARC  NODES 

1071  230 

IFS  I ROOT 

1  2 

NDEG  NLOP 

37  261 

ITER  NPRIT 

1041  0 

IPRINT 

0 

126749 

OUTFLO 

.00000 

FLONET 

126749.00000 

CSTNOW 

0.00000* 

TOTCST 

*************** 

ppc 

0.00001 

1000000 

BIG 

.00000 

SICH 

223.48170 

TIMAX 

0.00000 

TIME 

0.00001 

OUTFLO 

0. 1267490E+06 

FLONET 

0. 1267490E+06 

CSTNOW 

O.OOOOOOOE+OO 

TOTCST 
-0 . 14  94077E+13 

EPS 

0 . 1000000E-04 

BIG 

0. 1000000E+07 

0.2234817E+03 

TIMAX 

O.OOOOOOOE+OO 

TIME 

0 . 1000000E-04 

Decent her  I I 
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Arc  # 

I  ARC 

JARC 

LOWER 

UPPER 

COST 

AMP 

FLOW 

COST 

1 

i 

2 

0.00 

126749.00 

O.OOOOOOOE+OO 

1.0000 

1252.45 

0.000000 

2 

i 

3 

13900.00 

13900.00 

O.OOOOOOOE+OO 

1.0000 

13900.00 

0.000000 

3 

i 

5 

15605.00 

15605.00 

O.OOOOOOOE+OO 

1.0000 

15605.00 

0.000000 

4 

i 

7 

17739.00 

17739.00 

O.OOOOOOOE+OO 

1.0000 

17739.00 

0.000000 

5 

i 

9 

1730.00 

1730.00 

O.OOOOOOOE+OO 

1.0000 

1730.00 

0.000000 

6 

i 

11 

3472.00 

3473.00 

O.OOOOOOOE+OO 

1.0000 

3473.00 

0.000000 

7 

i 

13 

357.00 

357.00 

O.OOOOOOOE+OO 

1.0000 

357.00 

0.000000 

8 

i 

3 

722.00 

722.00 

O.OOOOOOOE+OO 

1.0000 

722.00 

0.000000 

9 

i 

22 

1197.00 

1197.00 

O.OOOOOOOE+OO 

1.0000 

1197.00 

0.000000 

10 

i 

41 

1429.00 

1429.00 

O.OOOOOOOE+OO 

1.0000 

1429.00 

0.000000 

11 

i 

60 

1790.00 

1790.00 

O.OOOOOOOE+OO 

1.0000 

1790.00 

0.000000 

12 

i 

79 

1323.00 

1323.00 

O.OOOOOOOE+OO 

1.0000 

1323.00 

0.000000 

13 

i 

98 

667.00 

667.00 

O.OOOOOOOE+OO 

1.0000 

667.00 

0.000000 

14 

i 

117 

714.00 

714.00 

O.OOOOOOOE+OO 

1.0000 

714.00 

0.000000 

15 

i 

136 

1064.00 

1064.00 

O.OOOOOOOE+OO 

1.0000 

1064.00 

0.000000 

16 

i 

155 

819.00 

819.00 

O.OOOOOOOE+OO 

1.0000 

819.00 

0.000000 

17 

i 

174 

497.00 

497.00 

O.OOOOOOOE+OO 

1.0000 

497.00 

0.000000 

18 

i 

193 

465.00 

465.00 

O.OOOOOOOE+OO 

1.0000 

465.00 

0.000000 

19 

i 

212 

445.00 

445.00 

O.OOOOOOOE+OO 

1.0000 

445.00 

0.000000 

20 

3 

22 

4211.00 

10782.61 

-0.20512 92E+ 03 

1.0000 

10440.14 

-205.129200 

21 

3 

22 

0.00 

4289.86 

-0 . 1234102E+03 

1.0000 

0.00 

-123.410200 

22 

3 

22 

0.00 

1594.20 

-0. 1844  921 E+ 02 

1.0000 

0.00 

-18.449210 

23 

3 

22 

0.00 

1047.33 

0.1383689E+03 

1.0000 

0.00 

138.368900 

24 

22 

41 

4211.00 

11130.43 

-0.2382582E+03 

1.0000 

10790.18 

-238.258200 

25 

22 

41 

0.00 

3884.06 

-0 . 1191396E+03 

1.0000 

0.00 

-119.139600 

26 

22 

41 

0.00 

1565.22 

0.5010889E+01 

1.0000 

0.00 

5.010889 

27 

22 

41 

0.00 

1134.29 

0 . 1448219E+03 

1.0000 

0.00 

144.821900 

28 

41 

60 

4211.00 

11130.43 

-0.2382582E+03 

0.9983 

11130.43 

-238.258200 

29 

41 

60 

0.00 

3884.06 

-0 . 1191396E+03 

0.9983 

241.80 

-119.139600 

30 

41 

60 

0.00 

1565.22 

0 . 5010889E+01 

0.9983 

0.00 

5.010889 

31 

41 

60 

0.00 

1134.29 

0 . 1448219E+03 

0.9983 

0.00 

144.821900 

32 

60 

79 

4211.00 

11130.43 

-0.2382582E+03 

0.9988 

11130.43 

-238.258200 

33 

60 

79 

0.00 

3884.06 

-0. 119139 6E+03 

0.9988 

1165.40 

-119.139600 

34 

60 

79 

0.00 

1565.22 

0.5010889E+01 

0.9988 

0.00 

5.010889 

35 

60 

79 

0.00 

1134.29 

0.1448219E+03 

0.9988 

0.00 

144.821900 

36 

79 

98 

4211.00 

11072.46 

-0 . 32233 91E+03 

0.9954 

11072.46 

-322.339100 

37 

79 

90 

0.00 

3826.09 

-0.1358066E+03 

0.9954 

1684.40 

-135.806600 

38 

79 

98 

0.00 

1652.17 

0 . 1780186E+02 

0.9954 

0.00 

17.801860 

39 

79 

98 

0.00 

1163.28 

0.2009804E+03 

0.9954 

0.00 

200.980400 

40 

98 

117 

4211.00 

11130.43 

-0.2382S82E+03 

0.9951 

11130.43 

-238.258200 

41 

98 

117 

0.00 

3884.06 

-0. 1191396E+03 

0.9951 

1387.28 

-119.139600 

42 

98 

117 

0.00 

1565.22 

0.5010889E+01 

0.9951 

0.00 

5.010889 

43 

98 

117 

0.00 

1134.29 

0 . 1448219E+03 

0.9951 

0.00 

144.821900 

44 

117 

136 

4211.00 

11043.48 

-0.2218894E+03 

0.9954 

11043.48 

-221.889400 

45 

117 

136 

0.00 

3913.04 

-0.1139978B+03 

0.9954 

845.75 

-113.997800 

46 

117 

136 

0.00 

1594.20 

-0.8609623E+01 

0.9954 

0.00 

-8.609623 

47 

117 

136 

0.00 

1163.28 

0 . 1333886E+03 

0.9954 

0.00 

133.388600 

48 

136 

155 

4211.00 

11130.43 

-0.2382582E+03 

0.9968 

10323.53 

-238.258200 

49 

136 

155 

0.00 

3884.06 

-0 . 1191396E+03 

0.9968 

0.00 

-119.139600 

50 

136 

155 

0.00 

1565.22 

0.5010889E+01 

0.9968 

0.00 

5.010889 

51 

136 

155 

0.00 

1134.29 

0.1448219E+03 

0.9968 

0.00 

144.821900 

{additional  ouput  deleted} 

1021 

229 

230 

0.00 

9420.29 

0 . 4246154E+01 

1.0000 

5929.29 

4.246154 

1022 

229 

230 

0.00 

9492.75 

0 . 4750994E+03 

1.0000 

0.00 

475.099400 

1023 

229 

230 

0.00 

980760.90 

0 . 2321544E+04 

1.0000 

0.00 

2321.544000 

1024 

21 

2 

0.00 

326.09 

-0. 182752 9E+08 

1.0000 

326.09+**“********* 

1025 

21 

2 

0.00 

9420.29 

0. 4246154E+01 

1.0000 

0271.38 

4.246154 

1026 

21 

2 

0.00 

9492.75 

0.4750994E+03 

1.0000 

0.00 

475.099400 

1027 

21 

2 

0.00 

980760.90 

0.2321544E+04 

1.0000 

0.00 

2321.544000 

HEC-PRM  User’s  Manual 


F  -  144 


December  1991 


Example  User  Input  and  Output 


{Last  arcs  in  network  matrix} 


Arc  # 

I ARC  JARC 

LOWER 

UPPER 

COST 

AMP 

FLOW 

COST 

1028 

40 

2 

0.00 

326.09 

-0.1827529t.*-08 

1.0000 

326. 09************** 

1029 

40 

2 

0.00 

9420.29 

0 . 4246154E+01 

1.0000 

8956.65 

4.246154 

1030 

40 

2 

0.00 

9492.75 

0.4750994E+03 

1.0000 

0.00 

475.099400 

1031 

40 

2 

0.00  980760.90 

0.2321544E+04 

1.0000 

0.00 

2321.544000 

1032 

59 

2 

0.00 

326.09 

-0.1827529E+08 

1.0000 

326. 09* ************* 

1033 

59 

2 

0.00 

9420.29 

0 . 4246154E+01 

1.0000 

5028.65 

4.246154 

1034 

59 

2 

0.00 

9492.75 

0. 4750994E+03 

1.0000 

0.00 

475.099400 

1035 

59 

2 

0.00  980760.90 

0.2321544E+04 

1.0000 

0.00 

2321.544000 

1036 

78 

2 

0.00 

326.09 

-0. 1827529E+08 

1.0000 

326. 09*****  ********* 

1037 

78 

2 

0.00 

9420.29 

0 . 4246154E+01 

1.0000 

7219.90 

4.246154 

1038 

78 

2 

0.00 

9492.75 

0.4750994E+O3 

1.0000 

0.00 

475.099400 

1039 

78 

2 

0.00  980760.90 

0.2321544E+04 

1.0000 

0.00 

2321.544000 

1040 

97 

2 

0.00 

326.09 

-0. 1827529E+08 

1.0000 

326. 09************** 

1041 

97 

2 

0.00 

9420.29 

0.4246154E+01 

1.0000 

8266.91 

4.246154 

1042 

97 

2 

0.00 

9492.75 

0 . 4750994E+03 

1.0000 

0.00 

475.099400 

1043 

97 

2 

0.00  980760.90 

0.2321544E+04 

1.0000 

0.00 

2321.544000 

1044 

116 

2 

0.00 

326.09 

-0.1827529E+08 

1.0000 

326. 09***** ********* 

1045 

116 

2 

0.00 

9420.29 

0.4246154E+01 

1.0000 

3998.74 

4.246154 

1046 

116 

2 

0.00 

9492.75 

0.4750994E+03 

1.0000 

0.00 

475.099400 

1047 

116 

2 

0.00  980760.90 

0.2321544E+04 

1.0000 

0.00 

2321.544000 

1048 

135 

2 

0.00 

326.09 

-0.1827529E+08 

1.0000 

326.09************** 

1049 

135 

2 

0.00 

9420.29 

0.4246154E+01 

1.0000 

9057.97 

4.246154 

1050 

135 

2 

0.00 

9492.75 

0.4750994E+03 

1.0000 

0.00 

475.099400 

1051 

135 

2 

0.00  980760.90 

0.2321544E+04 

1.0000 

0.00 

2321.544000 

1052 

154 

2 

0.00 

326.09 

-0. 1827529E+08 

1.0000 

326. 09************** 

1053 

154 

2 

0.00 

9420.29 

0 . 4246154E+01 

1.0000 

6582.27 

4.246154 

1054 

154 

2 

0.00 

9492.75 

0 . 4750994E+03 

1.0000 

0.00 

475.099400 

1055 

154 

2 

0.00  980760.90 

0.2321544E+04 

1.0000 

0.00 

2321.544000 

1056 

173 

2 

0.00 

326.09 

-0.1827529E+08 

1.0000 

326.09************** 

1057 

173 

2 

0.00 

9420.29 

0.4246154E+01 

1.0000 

5015.61 

4.246154 

1058 

173 

2 

0.00 

9492.75 

0.4750994E+03 

1.0000 

0.00 

475.099400 

1059 

173 

2 

0.00  980760.90 

0.2321544E+04 

1.0000 

0.00 

2321.544000 

1060 

192 

2 

0.00 

326.09 

-0 . 1 82752 9E+08 

1.0000 

326.09************** 

1061 

192 

2 

0.00 

9420.29 

0.4246154E+01 

1.0000 

4033.69 

4.246154 

1062 

192 

2 

0.00 

9492.75 

0 . 4750994E+03 

1.0000 

0.00 

475.099400 

1063 

192 

2 

0.00  980760.90 

0.2321544E+04 

1.0000 

0.00 

2321.544000 

1064 

211 

2 

0.00 

326.09 

-0.1827 52 9E +08 

1.0000 

326.09************** 

1065 

211 

2 

0.00 

9420.29 

0.42461S4E+01 

1.0000 

5286.05 

4.246154 

1066 

211 

2 

0.00 

9492.75 

0 . 4750994E+03 

1.0000 

0.00 

475.099400 

1067 

211 

2 

0.00  980760.90 

0.2321544E+04 

1.0000 

0.00 

2321.544000 

{The  following  4  arcs  are  for  the  link  between  St  Louis  and  the  Super  Sink  in 
February  1966} 


1068 

230 

2 

0.00 

326.09 

-0.1827529E+08 

1.0000 

326.09************** 

1069 

230 

2 

0.00 

9420.29 

0 . 4246154E+01 

1.0000 

5929.29 

4.246154 

1070 

230 

2 

0.00 

9492.75 

0 . 4750994E+03 

1.0000 

0.00 

475.099400 

1071 

230 

2 

0.00 

980760.90 

0 . 2321544E+04 

1.0000 

0.00 

2321.544000 

{Check  for  continuity  at  nodes} 

Check  of  feasibility 

Arc  #  Case  Flow  Parameter 


323  Lower  0.000 


0.000 
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Check  for  Optimality 


Case 

JUARC 

ii 

V 

U/L  Bound 

COST 

FLOW 

AMP 

POTi 

Lower 

50 

155 

0 . 863442E+03 

0.00000 

0 . 501089E+01 

0.000 

0.9968254 

-0 . 240529E+03 

Lower 

57 

193 

0.452313E+03 

0.00000 

-0. 101991E+03 

0.000 

0.9987790 

-0 . 8  91 309E+02 

Lower 

153 

157 

0 . 868192E+03 

0.00000 

0.1S6755E+02 

0.000 

0.9969749 

-0.252303E+03 

Upper 

183 

157 

0. 868 192E+03 9981 76. 80000 

-0 . 235292E+02 

0.000 

1.0000000 

-0 . 120483E+02 

Upper 

185 

176 

0. 64 3435E+03 998 176. 80000 

-0 . 235292E+02 

0.000 

1.0000000 

-0.242734E+02 

Upper 

280 

197 

0. 42881 3E+03996 97 3. 90000 

0.527123E+02 

0.000 

1.0000000 

-0 . 594581E+03 

Lower 

317 

66 

-0.445168E+03 

0.00000 

0 . 31 9982E+03 

0.000 

0.9972952 

-0. 476706E+03 

Lower 

340 

218 

0 .267063E+03 

435.13050 

-0. 659559E+02 

463.768 

1.0000000 

-0. 743088E+03 

Lower 

438 

163 

-0.470688E+03 

0.00000 

0 . 994878E+03 

0.000 

0.9974481 

-0.192237E+03 

Lower 

441 

182 

-0.390112E+03 

0.00000 

0 . 1 95578E+03 

0.000 

0.9976444 

-0 . 1 15003E+03 

Lower 

442 

182 

-0.390112E+03 

0.00000 

0. 918600E+03 

0.000 

0.9976444 

-0. 838025E+03 

Lower 

448 

220 

-0 . 8 1 9938E+03 

0.00000 

-0.800416E+03 

1313.043 

1.0000000 

-0 . 420140E+03 

Check  for  continuity  at  nodes 
JNODES  V ( JNODES ) 
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{Write  results  to  the  output  DSS  data  file} 

- DSS - Z WRITE  Unit  73;  Vers.  5:  //FTPK/STOR/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  5:  //GARR/STOR/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  5:  //OAHE/STOR/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  5;  //BEND/STOR/Ol JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  5:  //FTRA/STOR/Ol JAH1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  5:  //GAPT/STOR/Ol JAN1960/1MON/EXMPL1/ 

- DSS— -ZWRITE  Unit  73;  Vers.  3:  //FTPK/FLOW  LOC/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  6:  //FTPK/STOR701JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //FTPK/EVAP/01 JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  / /FTPK-FTPKR/ FLOW/ 01JAN1 960/ 1M0N/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //FTPKR-GARR/FLOW/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //GARR/FLOW  LOC/01JAN1960/1MOH/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  6:  //GARR/STOR701JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //GARR/EVAP/01 JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //GARR-GARRR/FLOW/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //GARRR-OAHE/FLOW/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //OAHE/FLOW  LOC/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  6:  //OAHE/STOR701JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //OAHE/EVAP/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //OAHE-OAHER/ FLOW/ 01JAN1 960 /1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //OAHER-BEND/FLOW/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  6:  //BEND/STOR/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //BEND/EVAP/01JANI960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //BEND-BENDR/FLOW/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //BENDR-FTRA/FLOW/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //FTRA/FLOW  LOC/01 JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  6:  //FTRA/STOR701JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //FTRA/EVAP/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3;  //FTRA-FTRAR/FLOW/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //FTRAR-GAPT/FLOW/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //GAPT/FLOW  LOC/01JANI960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  6:  //GAPT/STOR701JAN1960/1MON/EXMPL1/ 

- DSS  —  ZWRITE  Unit  73;  Vers.  3:  //GAPT/EVAP/01 JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //GAPT-GAPTR/FLOW/ 01 JAN1 960/1MON/EXMPL1  / 

- DSS— -ZWRITE  Unit  73;  Vers.  3:  / /GAPTR-SUX/FLOW/01 JAN1 960/1MON/EXMPL1 / 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //SUX/FLOW_LOC/01 JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //SUX-OMA/FLOW/01 JAW1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //OMA/FLOW  LOC/01 JAN1 960/ 1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //OMA-NCNE7FLOW/01 JAN1960/1MON/EXMPL1/ 

- DSS  — -ZWRITE  Unit  73;  Vers.  3:  //NCNE/FLOW_LOC/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //NCNE-MKC/FLOW/01 JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //MKC/FLOW  LOC/013AH1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //MKC-BNMO7FLOW/01 JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //BNMO/FLOW  LOC/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //BNMO-HEMO7FLOW/01JAN1960/1MON/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //HEMO/FLOW_LOC/01  JAN1960/1MOH/EXMPL1/ 

- DSS - ZWRITE  Unit  73;  Vers.  3:  / /HEMO- STL/FLOW/0 1JAN1 960/ 1MON/EXMPL1 / 

- DSS - ZWRITE  Unit  73;  Vers.  3:  //STL-S_SINK/FLOW/01JAN1960/1MON/EXMPL1/ 

{Close  DSS  data  files  and  terminate} 


- DSS - ZCLOSE  Unit:  71,  File:  TSIN.DSS 

Pointer  Utilization:  0.40 
Number  of  Records:  453 

File  Size:  451.3  Kbytes 

Percent  Inactive:  0.0 

- DSS - ZCLOSE  Unit:  72,  File:  PENCMP.DSS 

Pointer  Utilization:  0.31 
Number  of  Records:  289 

File  Size:  387.1  Kbytes 

Percent  Inactive:  2.9 

- DSS - ZCLOSE  Unit:  73,  File:  EXMPLl.DSS 

Pointer  Utilization:  0.37 
Number  of  Records:  342 

File  Size:  231.8  Kbytes 

Percent  Inactive:  0.0 

Elapsed  CPU  time  is  66  seconds  or  1.100  minutes  or  0.018  hours. 
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Introduction 


This  text  and  the  attached  table  summarizes  pathnames  as  needed  for  HEC- 
PRM  studies  particularly  as  used  in  the  MRD  Study.  The  text  written  in 
capital  letters  must  be  defined  exactly  as  written.  Parts  shown  in  lower  case 
letters  indicate  that  the  user  must  define  an  appropriate  part  (e.g. 
might  be  replaced  by  "//FTPK/...").  The  following  characters  have  special 
meanings  when  used  alone  (separated  by  V  or 

"a"  means  part  a  of  the  pathname.  Note  that  for  Phase  n,  part  "a"  is 
eliminated  for  all  node  /  link  locations. 

"b"  means  the  node  identifier  for  part  "b"  of  the  pathname. 

"bl"  means  the  node  identifier  for  the  upstream  ("from")  node  of  a  link. 
It  is  used  as  a  portion  of  pathname  part  "b". 

"b2"  means  the  node  identifier  for  the  downstream  ("to")  node  of  a  link. 
It  is  used  as  a  portion  of  pathname  part  "b". 

means  the  alternative  identifier  as  entered  on  the  "ZW"  record  in 
the  HEC-PRM  ASCII  input  data  file. 

Note  that  for  time  series  data,  part  D  is  not  shown  as  part  of  the  pathname  but 
it  is  assumed  to  be  the  standard  military  date  required  for  regular  interval  time 
series  data. 
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Maintaining  Consistent  Data  Units 

Since  the  same  penalty  function  can  be  expressed  in  different  units  (e.g. 
thousands  or  millions  of  dollars),  it  is  important  to  maintain  some  procedure 
or  naming  convention  which  allows  you  to  accurately  identify  the  data.  The 
HEC-PRM  model  requires  that  storage  and  flow  be  expressed  in  the  same 
units.  It  is  easiest  to  conceptualize  the  data  when  it  is  expressed  in  1,000 
acre-feet  per  month  as  opposed  to  cubic-feet-per-second.  However,  the  initial 
penalty  functions  might  be  derived  in  other  units  such  as  reservoir  pool  in 
terms  of  elevation.  The  table  shows  pathname  part  C  to  contain  the  units  of 
the  data  for  some  types.  However,  it  is  recommended  that  you  use  the 
following  procedure: 

Adopt  consistent  units  for  the  flow/storage  parameter  (such  as 
1,000  acre- feet  or  1,000  cubic  meters)  and  for  the  penalty 
parameter  (thousands  of  dollars). 

Enter  the  penalty  functions  and  time  series  data  in  DSS  data  files. 
Do  not  include  the  units  as  part  of  the  pathname  part  "c". 

If  you  enter  the  data  in  any  other  units  besides  the  "standard, 
consistent"  units  you  have  adopted,  then  enter  the  data  in  one  DSS 
data  file  and  store  the  converted  data  in  another  file.  This  avoids 
the  nuisance  of  entering  data  units  in  part  C. 

For  example,  if  you  adopt  the  storage  units  to  be  thousands  of  acre-feet 
(KAF)  but  you  enter  storage  as  elevation,  then  store  the  elevation-penalty 
functions  in  one  DSS  file  (e.g.  pfbase.dss)  and  use  MATHPK  to  convert 
elevation  to  storage  and  write  the  storage-penalty  function  in  another  DSS  file 
(e.g.  pfmaster.dss)  which  is  used  as  input  to  HEC-PRM. 
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Summary  of  Developing  Data  V»:th  Recommended  Pathname  Parts 


This  section  describes  the  process  of  entering  data  into  DSS  data  files.  The 
data  may  be  entered  by  either  running  generalized  HEC-DSS  utility  programs 
and  typing  data  into  the  file  from  the  keyboard  or  by  executing  District 
specific  utility  programs  that  read  existing  data  from  ASCII  data  files. 

Results  are  stored  by  one  of  several  computer  programs  including  HEC-PRM, 
PRMPOST,  or  by  utility  programs  such  as  MATHPK.  Some  pathname  parts 
are  hardwired  into  HEC-PRM  whereas  others  are  dependent  upon  user  input 
(node  identifiers  on  "NODE"  records  and  alternative  identifiers  on  the  "ZW" 
record).  MATHPK  uses  parts  defined  by  the  user  in  either  input  commands 
ot  PREAD  macros  (file  MPK.MAC).  Specifically,  the  following  programs 
may  be  used: 

Program  Description 

DSSPD  HEC-DSS  generalized  program  which  allows  the  user 

to  store  paired  data  in  a  DSS  data  file. 

DSSTS  HEC-DSS  generalized  program  which  allows  the  user 

to  store  regular  interval  time  series  data  in  a  DSS  data 
file. 

DSSUTL  HEC-DSS  generalized  program  which  allows  the  user 

to  edit  data  which  is  already  entered  in  a  DSS  data 
file. 

DSPLAY  HEC-DSS  generalized  program  which  allows  the  user 

to  graphically  edit  data  which  is  already  entered  in  a 
DSS  data  file.  Graphical  editing  is  done  with  a  mouse. 

MATHPK  HEC-DSS  generalized  program  which  allows  the  user 
to  retrieve  data  from  DSS  data  file(s),  perform 
mathematical  operation  or  functions  on  that  data,  and 
store  the  results  in  DSS  data  file(s). 

RDATAO  MRD  specific  program  which  reads  the  file 

"DODATA.DOD"  which  is  a  copy  of  MRD’s  file 
"DODATA".  RDATAO  provides  default  pathname 
parts  and  stores  inflow,  depletions,  and  evaporation 
rates  in  a  DSS  data  file. 

RDMATF  MRD  specific  program  which  reads  "DMATFILE" 
files  created  by  using  MRD’s  program  "VI. EXE". 
RDMATF  defines  default  pathname  parts  and  stores 
data  associated  with  any  of  the  parameters  shown  in 
the  "Vl.EXE"  menu. 
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Time  Series  — J  DSSTS 


Enter  and  Compute  Incremental  Inflow,  Depletions,  and  Adjusted  Inflow  Data 


The  unadjusted,  incremental,  local  inflow  is  entered  first  It  is  entered  in  the 
input  DSS  data  file  MRD.DSS.  The  basic  flow  and  evaporation  rate  data  is 
entered  using  "RDATAO".  The  monthly  varying  depletions  are  entered  using 
the  DSSPD  program,  and  the  adjusted  local  flows  are  computed  and  stored 
using  MATHPK.  All  flow  data  is  stored  as  regular  interval  time  series  data 
except  the  monthly  varying  depletions.  They  are  stored  as  paired  data  -  the 
first  variable  is  the  month  number  (1  through  12)  and  the  second  variable  is 
the  flow  depletion.  The  following  pathname  parts  are  used: 

Part  Description 

A  Leave  Blank. 

B  The  node  identifier  at  which  the  inflow  enters  (e.g.  "FTPK"). 

C  The  parameter  name  including  the  code  to  indicate  if  the 

flow  in  total  or  incremental.  For  example: 


Name 

Description 

FLOWJLOCJNC 

Incremental  local  inflow. 

FLOWJDPL 

Incremental  depletions  from 
local  inflow. 

MON-FLOW_DPL 

Monthly  varying,  incremental 
depletions  from  local  inflow. 
(All  January  depletions  are  the 
same,  all  February  depletions 
are  the  same  but  different  than 
January). 

FLOW_LOC 

Incremental  adjusted  local 
inflow  (computed  from  inflows 
and  depletions). 

FLOW_LOC_TOT 

Total  cumulative  local  inflow 
for  all  drainage  above  this 
location. 

FLOW_DEPL_TOT 

Total  cumulative  depletions. 

FLOW_LOC_TOT 

Total  adjusted  local  inflow 
(computed). 

D  &  E  Standard  pathname  parts  for  regular  interval  time  series  data. 

F  Used  only  to  identify  the  base  year  associated  with 

depletions  (e.g.  1975  level  of  depletion).  The  MATHPK 
macro  which  computes  adjusted  local  inflow  utilizes  this 
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identifier  to  retrieve  depletions  for  the  desired  year. 


The  following  are  example  uses  of  pathname  parts  for  the  MRD  study: 

Local  incremental  inflow: 

//FTPK/FLO  W_LOC_INC/0 1  JAN 1 900/1 MON// 
//SUX/FLOW_LOC_INC/01JAN1900/1MON// 


Incremental  depletions  for  1975: 

//FTPK/FLO  W_LOC_DPLA)  1  JAN 1 900/1 MON/1 975/ 
//SUX/FLOW_LOC_DPL/0 1  JAN 1 900/1MON/1 975/ 


Monthly  varying,  local  incremental  depletions  (paired  data): 
//FTPK/MON-FLOW_DPL//// 
//SUX/MON-FLOW_DPL//// 


Incremental  adjusted  local  inflow  using  depletions: 
//FTPK/FLOW_LOC/01JAN1900/1MON// 
//SUX/FLOW_LOC/01JAN1900/1MON// 


The  "Incremental  adjusted  local  inflow  using  depletions”  is  used  by  HEC- 
PRM  as  basic  input  to  define  inflow  to  the  system.  Note  that  the  depletion 
year  is  not  used  in  that  pathname. 
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Enter  the  Evaporation  Rate 


Currently,  the  yearly  evaporation  rate  is  read,  distributed  by  month,  and  stored 
in  the  time  series  input  DSS  data  file  (MRD.DSS)  by  the  program 
"RDATAO".  "RDATAO"  also  stores  the  yearly  rate.  The  distribution  pattern 
is  hardwired  internally  to  RDATAO.  You  may  develop  a  MATHPK  macro  to 
distribute  it  differently.  The  evaporation  rates  are  stored  as  regular  interval 
time  series  data.  The  following  pathname  parts  are  used: 

Part  Description 

A  Leave  Blank. 

B  The  node  identifier  of  the  reservoir  at  which  evaporation 

exits  the  network  (e.g.  "FTPK"). 

C  The  parameter  name  including  the  code  to  indicate  that  it  is 

an  evaporation  rate.  It  is  assumed  that  the  rate  is  for  a  time 
period  which  corresponds  to  the  time  interval.  For  example: 

Name  Description 

EVAPORATE  Evaporation  rate  (in  feet  per 

month  if  entered  as  monthly 
regular  interval  data). 

EVAPJRATE  Evaporation  rate  (in  feet  per 

year  if  entered  as  yearly  regular 
interval  data). 

D  &  E  Standard  pathname  parts  for  regular  interval  time  series  data. 

F  Leave  it  blank.  It  could  be  used  to  identify  the  base  year  (or 

method)  associated  with  the  evaporation.  However, 
MATHPK  macros  currently  require  this  to  be  left  blank. 

The  following  are  example  uses  of  pathname  parts  for  the  MRD  study: 

Monthly  evaporation  rate: 

//FTPK/EVAP_R  ATE/0 1  JAN 1 900/ 1 MON// 

Yearly  evaporation  rate: 

//FTPK/EVAP_R  ATE/01  JAN  1 900/1  YEAR// 

Monthly  evaporation  rate  in  inches  per  month.  Normally,  this  should  be 
stored  in  another  "working"  DSS  file  before  conversion  to  the  standard  data 
units  of  feet  per  month: 

//FTPK/EVAP_RATE(IM)/01  JAN  1900/1  MON// 
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Enter  the  Elevation-Area-Capacity  Curves 


The  elevation-area-capacity  curves  are  used  to  convert  reservoir  storage  to 
elevation  or  vice-versa  or  to  plot  the  area-capacity  curves.  These  curves  are 
primarily  used  to  post  process  results  but  can  be  used  to  convert  penalty 
functions  from  elevation-penalty  to  storage-penalty.  These  curves  are  stored 
in  the  input  DSS  data  file  "PENCMP.DSS"  using  the  generalized  HEC-DSS 
program  "DSSPD".  The  data  is  not  exactly  paired  data  because  there  are  3 
parameters:  elevation,  area,  and  capacity.  However,  the  data  can  be  stored  as 
paired  data  with  elevation  being  the  first  variable  and  die  second  variable 
having  2  curves:  (1)  area  and  (2)  capacity.  To  plot  data  with  HECDSS- 
DSPLAY,  the  "TYpe"  command  must  be  used  and  the  "CUrve"  command 
may  be  used.  The  following  pathname  parts  are  used: 

Part  Description 

A  Leave  Blank. 


B  The  node  identifier  of  the  reservoir  for  which  the  curves 

apply  (e.g.  "FTPK"). 

C  The  parameter  name  "EL-AR-CAP". 

D  &  E  Leave  blank. 


F  Leave  blank.  It  could  be  used  to  identify  the  year  in  which 

the  curve  was  calibrated.  However,  the  MATHPK  macros 
assume  this  part  is  blank. 


The  following  are  example  uses  of  pathname  parts  for  the  MRD  study: 


Fort  Peck  rating  curve  for  1973: 

//FTPK/EL-  AR-C  AP///1 973/ 

Fort  Peck  rating  curve  used  in  the  optimization  model  and  MATHPK  macros: 
//FTPK/EL- AR-CAP//// 
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Enter  the  Hydropower  Coefficients 


The  hydropower  coefficients  are  used  to  compute  (by  the  MRD  method)  the 
amount  of  power  and  energy  generated.  The  coefficients  are  stored  in  the 
input  DSS  data  file  PENCMP.DSS  and  are  stored  as  paired  data  format. 
However,  the  data  is  not  pure  paired  data  since  it  consists  of  both  coefficients 
and  power  data. 

For  all  reservoirs  except  Gavins  Point,  the  function  contains  three  curves  -  the 
first  variable  is  reservoir  elevation  (in  FEET)  and  the  second  variable  is  power 
data.  The  first  curve  is  the  coefficient  "A",  the  second  curve  is  the  coefficient 
"B",  and  the  third  curve  is  the  capacity. 

For  Gavins  Point,  energy  and  power  are  a  function  of  discharge  and 
coefficients  are  not  used.  The  first  variable  is  discharge  and  the  second 
variable  is  "POWER".  The  data  is  stored  with  three  curves  -  the  first  curve 
is  energy  corresponding  to  the  fiist  variable  which  is  discharge,  the  second 
curve  is  flow  which  corresponds  to  power,  and  the  third  curve  is  power  which 
is  related  to  the  second  curve. 

The  following  pathname  parts  are  used: 

Part  Description 

A  Leave  Blank. 

B  The  node  identifier  of  the  reservoir  for  which  the  coefficients 

apply  (e.g.  "FTPK"). 

C  The  parameter  name  "EL-COEFF_ENRGY"  for  all 

reservoirs  except  Gavins  Point.  "FLOW-POWER”  for 
Gavins  Point. 

D  &  E  Leave  blank. 

F  Leave  blank.  It  could  be  used  to  identify  the  method  or  year 

in  which  the  curve  was  calibrated.  However,  MATHPK 
macros  only  recognize  the  pathname  if  part  F  is  blank. 

The  following  are  example  uses  of  pathname  parts  for  the  MRD  study: 


Fort  Peck  coefficients: 

//FTPK/EL-COEFF_ENRGY//// 

Fort  Peck  coefficients  in  storage  units: 
//FTPK/STOR-COEFF_ENRGY//// 
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Enter  Class  Intervals  For  Duration  Analysis 


The  class  intervals  are  used  by  MATHPK  to  compute  the  several  functions 
relating  reservoir  elevation  or  flow  and  duration  from  HEC-PRM  results.  The 
functions  include  monthly  as  well  as  totals  (e.g.  the  number  of  times  in 
percent  a  given  elevation  was  equalled  or  exceeded  during  all  Januarys  and 
for  all  months).  The  class  intervals  are  stored  in  the  input  DSS  data  file 
PENCMP.DSS  and  are  stored  in  paired  data  format.  The  first  variable  is  the 
index  number  (1  through  the  number  of  values  entered)  and  the  second 
variable  is  the  elevation  (or  flow)  for  each  class  interval.  Elevations  (or  flow) 
are  entered  in  increasing  order  (smallest  values  first).  The  DSSPD  program 
may  used  to  enter  this  data.  However,  if  you  define  the  class  intervals  in 
equal  increments  (e.g.  elevation  in  1  foot  intervals),  the  MATHPK  macro 
"CLASSDEF"  may  be  used  with  much  less  effort.  The  following  pathname 
parts  are  used: 

Part  Description 

A  Leave  Blank. 

B  The  node  identifier  of  the  reservoir  or  the  link  for  which  the 

class  intervals  apply  (e.g.  "FTPK”  or  "FTPK-GARR"). 

C  The  parameter  name  "INDEX-FLOW_CLASS_INTRVL"  or 

"INDEX-ELEV_CLASS_INTRVL". 

D  &  E  Leave  blank. 

F  Leave  blank. 


The  following  are  example  uses  of  pathname  parts  for  the  MRD  study: 


Fort  Peck  pool  elevation  class  intervals: 

//FTPK/INDEX-ELEV_CLASS_INTRVL//// 

Fort  Peck  release  class  intervals: 

//FTPK-GARR/INDEX-FLOW_CLASS_INTRVL//// 
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Enter  the  Storage  Penalty  Functions 


The  storage-penalty  functions  are  entered  as  paired  data  convention  in  the 
input  DSS  data  file  PENCMP.DSS.  Storage  is  entered  in  thousands  of  acre- 
feet  (KAF)  and  penalty  in  thousands  of  dollars  (K$).  If  the  units  are  not  the 
same  as  you  have  adopted,  then  the  units  must  be  included  as  part  of  part  C 
or  the  functions  must  be  stored  in  separate  DSS  data  files.  For  all  functions, 
the  applying  guidelines  are  suggested: 

(1)  Enter  the  bask  twelve  curves  (one  for  each  month  of  the  year)  in 
one  pathname  record.  The  first  variable  is  "STOR"  (storage  in 
KAF)  and  the  second  is  "PNLTY”  (penalty  in  K$).  Use  the  same 
values  of  storage  for  all  penalty  functions  for  one  reservoir  (e.g. 
recreation  and  water  supply  penalty  functions  are  stored  in 
separate  pathnames  but  have  the  same  storage  ordinates).  The 
parameter  name  "PNLTY"  is  appended  with  some  qualifier  label 
which  identifies  the  penalty  category  (REC  for  recreation  penalty 
due  to  storage  etc.) 

(2)  If  the  function  does  not  vary  monthly  (one  curve  applies  to  all 
months),  enter  the  function  as  a  monthly  varying  curve  by 
duplicating  the  one  curve  for  all  months.  Current  MATHPK 
macros  assume  all  functions  vary  monthly  so  the  curve  should  be 
duplicated  for  all  months  before  storing  in  the  DSS  data  file. 

(3)  The  computed  composite  penalty  function  is  calculated  using 
MATHPK  to  add  the  component  parts  (e.g.  recreation,  water 
supply,  etc.)  to  get  the  total  penalty  for  each  storage.  It  is  then 
stored  in  the  DSS  data  file  "PENCMP.DSS". 

(4)  Store  the  edited  composite  penalty  functions  as  a  single  curve  for 
a  given  location  for  a  given  month  (e.g.  the  edited  Fort  Peck  July 
penalty  function  is  stored  in  one  pathname  and  the  August  penalty 
function  is  stored  in  a  different  record).  The  edited  composite 
function  is  typically  derived  using  the  graphical  editing  capability 
of  HECDSS-DSPLAY.  However,  the  data  may  be  exported  to 
some  other  package  (such  as  Excel)  for  graphical  editing. 

(5)  To  mesh  with  MATHPK  macros,  the  final,  edited  penalty 
functions  should  have  a  blank  pathname  part  F. 


HEC'PRM  pathname  parts  (MRD) 


G  -  1 6h 


December  1991 


The  following  pathname  parts  are  used  for  storage  penalty  functions: 

Part  Description 

A  Leave  Blank. 

B  The  node  identifier  of  the  reservoir  for  which  the  penalty 

function(s)  apply  (e.g.  "FTPK"). 

C  The  parameter  names  "STOR-PNLTY_###"  where  ”###"  is 

the  qualifier  for  the  penalty.  The  following  are  typical 

definitions  for  "###": 


Code  Description 

NAV  Navigation 

WSP  Water  Supply 

HPC  Hydropower  Capacity 

HPE  Hydropower  Energy 

REC  Recreation 

FDU  Rood  Damage  Urban. 

FDA  Hood  Damage  Agricultural. 

CMP  Computed  composite  curve. 

EDT  Edited  composite  curve. 

D  &  E  Leave  blank. 

F  Leave  this  part  blank  for  the  final  functions  including  the 

individual  category  functions  (e.g.  recreation),  the 
computed  composite,  and  the  edited  composite  penalty 
functions.  It  could  be  used  to  identify  the  version  of  this 
function  such  as  ’TNITL"  for  die  original  function,  "VERl" 
for  version  1  of  the  composite  computed  function,  or 
"VER2"  for  version  2  of  the  composite  edited  function. 
However,  MATHPK  macros  require  a  blank  part  F. 

The  following  are  example  uses  of  pathname  parts  for  the  MRD  study: 

Fort  Peck  pool  recreation: 

//FTPK/STOR-PNLTY_REC//// 

Fort  Peck  pool  hydropower  capacity: 

//FTPK/STOR-PNLTY_HPC//// 

Fort  Peck  pool  total  composite  computed: 

//FTPK/STOR-PNLTY_CMP//// 

Fort  Peck  pool  preliminary,  total,  composite,  edited: 

//FTPK/STOR-  PNLTYJEDT///VER 1/ 

Fort  Peck  pool  final,  total,  composite,  edited  (used  in  the  model): 

//FTPK/STOR-PNLTYEDT//// 
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Enter  the  Flow  Penalty  Functions 


The  flow-penalty  functions  are  entered  as  paired  data  convention  in  the  input 
DSS  data  file  PENCMP.DSS.  Flow  is  entered  in  thousands  of  acre-feet  per 
month  (KAF)  and  penalty  in  thousands  of  dollars  (K$).  If  the  units  are  not 
the  same  as  you  have  adopted,  then  the  units  must  be  included  as  part  of  part 
C  or  the  functions  must  be  stored  in  separate  DSS  data  files.  For  all 
functions,  the  applying  guidelines  are  suggested: 

(1)  Enter  the  bask  penalty  functions  as  twelve  curves  (one  for  each 
month  of  the  year)  in  one  pathname  record.  The  fust  variable  is 
"FLOW"  (flow  in  KAF)  and  the  second  is  "PNLTY"  (penalty  in 
K$).  The  parameter  name  "PNLTY"  is  appended  by  some 
qualifier  label  which  identifies  the  penalty  category  (REC  for 
recreation  penalty  due  to  flow,  etc.) 

(2)  If  the  function  does  not  vary  monthly  (one  curve  applies  to  all 
months),  enter  the  function  as  a  monthly  varying  curve  by 
duplicating  die  one  curve  for  all  months.  Current  MATHPK 
macros  assume  all  functions  vary  monthly  so  the  curve  should  be 
duplicated  for  all  months  before  storing  in  the  DSS  data  file. 

(3)  Store  the  hydropower  energy  penalty  functions  as  a  family  of 
curves  in  which  each  pathname  record  contains  data  for  one 
location  and  one  month  of  the  year.  Hydropower  energy  penalties 
are  a  function  of  both  reservoir  release  and  pool  storage.  Each 
curve  has  an  associated  pool  storage  in  KAF.  The  pool  storage  is 
entered  as  the  "curve  label"  in  accordance  with  standard  DSS 
conventions. 

(4)  The  computed  composite  penalty  function  is  calculated  using 
MATHPK  to  add  the  component  parts  (e.g.  recreation,  water 
supply,  etc.)  to  get  the  total  penalty  for  each  flow.  Since  there  is 
a  separate  link  for  hydropower  releases,  the  computed  composite 
curve  does  not  contain  any  energy  penalties.  It  is  then  stored  in 
the  DSS  data  file  "PENCMP.DSS". 

(5)  Store  the  edited  composite  penalty  functions  as  a  single  curve  for 
a  given  location  for  a  given  month  (e.g.  the  edited  Fort  Peck  to 
Garrison  July  penalty  function  is  stored  in  one  pathname  and  the 
August  penalty  function  is  stored  in  a  different  record).  The 
edited  composite  function  is  typically  derived  using  the  graphical 
editing  capability  of  HECDSS-DSPLAY.  However,  the  data  may 
be  exported  to  some  other  package  (such  as  Excel)  for  graphical 
editing. 

(6)  To  mesh  with  MATHPK  macros,  the  final,  edited  penalty 
functions  should  have  a  blank  pathname  part  F. 
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The  following  pathname  parts  are  used: 

Part  Description 

A  Leave  Blank. 

B  The  identifiers  of  the  upstream  (or  "from"  node)  and  the 

downstream  (or  "to"  node). 

C  The  parameter  names  "FLOW-PNLTY_###"  where  "###"  is 

the  qualifier  for  the  penalty.  The  following  are  typical 
definitions  for  "###": 


Code 

Description 

NAV 

Navigation 

WSP 

Water  Supply 

HPC 

Hydropower  Capacity 

HPE 

Hydropower  Energy 

REC 

Recreation 

FDU 

Flood  Damage  Urban. 

FDA 

Rood  Damage  Agricultural. 

HPE_EDT 

Edited  hydropower  energy  curve. 

CMP 

Computed  composite  curve. 

EDT 

Edited  composite  curve. 

F  Leave  this  part  blank  for  the  final  functions  including  the 

individual  category  functions  (e.g.  recreation),  the 
computed  composite,  and  the  edited  composite  penalty 
functions.  It  could  be  used  to  identify  the  version  of  this 
function  such  as  "INITL"  for  the  original  function,  "VERl" 
for  version  1  of  the  composite  computed  function,  or 
"VER2"  for  version  2  of  the  composite  edited  function. 
However,  MATHPK  macros  require  a  blank  part  F. 
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The  following  are  example  uses  of  pathname  parts  for  the  MRD  study: 


Fort  Peck  release  recreation: 

//FTPK  -  G  ARR/FLO  W -PNLT  Y_REC//// 

Fort  Peck  hydropower  energy  for  March: 

//FTPK-GARR/FLOW-PNLTY_HPE//MAR// 

Fort  Peck  computed,  composite  penalty  for  releases: 
//FTPK-GARR/FLOW-PNLTY_CMP//// 

Fort  Peck  edited,  penalty  for  hydropower  releases  for  July: 
//FTPK-GARR/FLOW-PNLTY_HPE_EDT//JUL// 

Note:  The  edited  hydropower  energy  curves  are  a  family  of  curves,  each 
curve  corresponds  to  an  assumed  pool  storage.  The  same  flows  must  be 
used  for  all  curves. 

Fort  Peck  preliminary,  edited,  composite  penalty  for  releases  in  July. 
//FTPK-GARR/FLOW-PNLTY_EDT//JUIWERl/ 

Fort  Peck  final,  edited,  composite  penalty  for  releases  in  July: 
//FTPK-GARR/FLOW-PNLTYEDT//JUL// 

Sioux  City  navigation: 

//SUX-OMA/FLOW-PNLTY_NAV//// 
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Writing  Evaporation,  Storage,  and  Discharge  Results  To  DSS  by  HEC-PRM 


HEC-PRM  writes  three  basic  “water"  parameters  (as  opposed  to  "economic” 
parameters)  to  an  output  DSS  data  file:  (1)  Evaporation  flow  in  KAF/month, 
(2)  Reservoir  storage  in  KAF,  and  (3)  Flow  in  KAF/month  (either  channel, 
diversion,  or  release).  Normally,  there  is  one  output  DSS  data  file  for  each 
alternative.  HEC-PRM  utilizes  input  from  the  "ZW"  record  to  define  part  F. 
The  following  pathname  parts  are  used  for  regular  interval  time  series 
evaporation,  reservoir  storage,  and  discharge: 

Part  Description 

A  Leave  Blank. 

B  For  reservoir  storage  and  evaporation,  the  node  identifier  of 

the  reservoir  (e.g.  "FTPK").  For  flows  (channel,  release, 

diversion)  the  upstream  ("from")  node  and  downstream  ("to") 
node  identifiers  (e.g.  "FTPK-GARR"). 

C  The  parameter  name.  Storage  is  "STOR"  and  evaporation  is 

"EVAP"  and  flow  is  "FLOW".  To  determine  the  type  of 
flow  (channel,  diversion,  or  release),  the  user  must  consult 
HEC-PRM  input. 

D  Sr.  E  Standard  pathname  parts  for  regular  interval  time  series  data. 

F  Identifies  the  alternative  being  studied.  It  is  taken  from  the 

ZW  record  in  the  HEC-PRM  ASCII  inpu  data  file. 


The  following  are  example  uses  of  pathname  parts  for  the  MRD  study  where 
the  alternative  identifier  from  the  ZW  record  is  "5Y0D": 

Reservoir  storage  in  Fort  Peck: 

//FTPK/STOR/0 1 J  AN  1960/1 MON /5  Y  0D/ 

Reservoir  evaporation  from  Fort  Peck: 

//FTPK/EVAP/01JAN 1 960/1  MON/5  YOD/ 

Reservoir  release  from  Fort  Peck  (hydropower  and  "all  other  purposes"  links): 
//FTPK-FTPKR/FLOW/O I  JAN  1 960/1  MON/5  YOD/ 
//FTPKR-GARR/FLO  W/0 1  JAN  1 960/1  MON/5  YOD/ 

Channel  flow  from  Sioux  City  to  Omaha: 

//SUX-OMA/FLOW/OIJAN 1 960/1  MON/5  YOD/ 

Hypothetical  diversion  from  Gavias  Point  to  Omaha: 

//G  APT-OMA/FLO  W/0 1  JAN  1 960/ 1  MON/5  YOD/ 
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Writing  Edited  Penalty  Functions  To  DSS  by  HEC-PRM 


HEC-PRM  writes  edited  penalty  functions  to  the  output  DSS  data  file.  Since 
HEC-PRM  input  allows  one  edited  function  to  apply  to  more  than  one  month, 
it  computes  functions  for  each  month,  extends  or  truncates  the  function  at  zero 
storage  or  flow,  and  extends  or  truncates  the  function  at  the  upper  bound  as 
entered  in  HEC-PRM  input.  The  following  pathname  parts  are  used  for 
regular  interval  evaporation,  reservoir  storage,  and  discharge: 

Part  Description 

A  Leave  Blank. 

B  For  reservoir  storage,  the  node  identifier  of  the  reservoir 

(e.g.  "FTPK").  For  flows  (channel,  release,  diversion)  the 
upstream  ("from")  node  and  downstream  ("to")  node 
identifiers  (e.g.  "FTPK-GARR"). 

C  The  parameter  names  such  as  "STOR-PNLTY_EDT”  or 

"FLOW-PNLTY_EDT",  or  "FLOW-PNLTY_HPE_EDT". 

D  Leave  blank. 

E  The  3  character  identifier  of  the  month  for  which  the  penalty 

function  applies  (e.g.  "JUL”). 

F  Identifies  the  alternative  being  studied.  It  is  taken  from  the 

ZW  record  in  the  HEC-PRM  ASCII  input  data  file. 


The  following  are  example  uses  of  pathname  parts  for  the  MRD  study  where 
the  alternative  identifier  from  the  ZW  record  is  "5Y0D": 

Reservoir  storage  penalty  for  Fort  Peck  for  July: 
//FTPK/STOR-PNLTY_EDT//JUL/5YOD/ 

Reservoir  release  from  Fort  Peck  (hydropower  and  "all  other  purposes"  links) 
for  July: 

//FTPK-FTPKR/FLOW-PNLTY_HPE_EDT//JUL/5YOD/ 

//FTPKR-GARR/FLOW-PNLTY_EDT//JUL/5YOD/ 

Channel  flow  from  Sioux  City  to  Omaha  for  July: 
//SUX-OMA/FLOW-PNLTY_EDT//JU175YOD/ 

Hypothetical  diversion  from  Gavins  Point  to  Omaha: 

//G  A  PT-OM  A/FLO  W-  PNLTYEDT//JUL/5  YOD/ 
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Writing  Converted  Results  To  DSS  by  MATHPK 


The  three  basic  "water"  parameters  written  to  an  output  DSS  data  file  are 
converted  to  other  units  by  application  of  the  MATHPK  program  and 
associated  macros:  (1)  Evaporation  flow  in  KAF/month  is  not  converted,  (2) 
Reservoir  storage  in  KAF  is  converted  to  pool  elevation  in  feet,  and  (3)  Flow 
in  KAF/month  (either  channel,  diversion,  or  release)  is  converted  to  KCFS 
(thousands  of  cubic-feet-per-second).  MATHPK  opens  another  DSS  file 
which  has  the  same  name  as  the  HEC-PRM  output  DSS  data  file  but  appends 
the  letter  "O”  to  it  (e.g.  I5Y0D.DSS  to  I5YODO.DSS).  MATHPK  modifies 
the  pathname  of  the  basic  results  to  store  converted  results.  The  following 
pathname  parts  are  used  for  regular  interval  reservoir  storage  and  discharge: 

Part  Description 

A  Left  Blank. 

B  For  reservoir  storage,  the  node  identifier  of  the  reservoir 

(e.g.  "FTPK").  For  flows  (channel,  release,  etc.)  the 
upstream  ("from")  node  and  downstream  ("to")  node 
identifiers  (e.g.  "FTPK-GARR"). 

C  The  parameter  name.  Pool  elevation  is  "ELEV",  flow  is 

"FLOW”.  Flow  is  qualified  by  the  units  when  they  don’t 
conform  to  the  standard  (KAF)  such  as  "FLOW(CFS)". 

D  &  E  Standard  pathname  parts  for  regular  interval  time  series  data. 

F  Identifies  the  alternative  being  studied.  It  is  taken  from  the 

ZW  record  in  the  HEC-PRM  ASCII  input  data  file. 


The  following  are  example  uses  of  pathname  parts  for  the  MRD  study  where 
the  alternative  identifier  from  the  ZW  record  is  "5Y0D": 

Reservoir  storage  in  Fort  Peck: 

//FTPK/STOR/O I  JAN 1 960/1 MON/5  YOD/ 
//FTPK/ELEV/01JAN1960/1MON/5Y0D/ 

Reservoir  release  from  Fort  Peck: 

//FTPK-G  ARR/FLO  W/01  JAN 1 960/1 MON/5  YOD/ 
//FTPK-GARR/FLOW(CFS)/01JAN1960/i  MON/5  YOD/ 

Channel  flow  from  Sioux  City  to  Omaha: 

//SUX-OMA/FLOW/01JAN1960/1MON/5YOD/ 

//S  UX-OMA/FLO  W(CFS)/0 1  JAN 1 960/1  MON/5  Y  0D/ 

Hypothetical  diversion  from  Gavins  Point  to  Omaha: 

//G  A  PT-OMA/FLO  W(CFS)/0 1  JAN  1 960/1  MON/15  YOD/ 
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Writing  Economic  (Penalty)  Results  To  DSS  by  MATHPK 


HEC-PRM  writes  basic  "water"  parameters  to  an  output  DSS  data  file:  (1) 
Evaporation  flow  in  KAF/month,  (2)  Reservoir  storage  in  KAF,  and  (3)  Flow 
in  KAF/month  (either  channel,  diversion,  or  release).  MATHPK  utilizes  these 
results  and  the  penalty  functions  to  compute  regular  interval  time  series 
penalty  histograms.  MATHPK  opens  another  DSS  file  which  has  the  same 
name  as  the  HEC-PRM  output  DSS  data  file  but  appends  the  letter  "O"  to  it 
(e.g.  I5Y0D.DSS  to  I5YODO.DSS).  MATHPK  modifies  the  pathname  of  the 
basic  results  to  store  converted  results.  The  following  pathname  parts  are 
used  for  penalty  histograms  based  upon  regular  interval  time  series  reservoir 
storage  and  discharge: 

Part  Description 

A  Leave  Blank. 

B  For  reservoir  storage,  the  node  identifier  of  the  reservoir 

(e.g.  "FTPK").  For  flows  (channel,  release,  etc.)  the 
upstream  ("from")  node  and  downstream  ("to")  node 
identifiers  (e.g.  "FTPK-GARR"). 

C  The  penalty  code  name  "PNLTY"  appended  by  the  type  of 

category  (e.g.  "PNLTY_REC"  for  penalties  associated  with 
recreation.  MATHPK  macros  compute  the  difference 
between  penalties  calculated  with  the  "computed  composite" 
penalty  function  and  the  "edited  composite"  penalty  function. 
This  time  series  is  identified  as  "PNLTY_DIFF,. 

D  &  E  Standard  pathname  parts  for  regular  interval  time  series  data. 

F  Identifies  the  alternative  being  studied.  It  is  taken  from  the 

ZW  record  in  the  HEC-PRM  ASCII  input  data  file. 
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The  following  are  example  uses  of  pathname  parts  for  the  MRD  study  where 
the  alternative  identifier  from  the  ZW  record  is  "5Y0D":: 


HECPRM  pathname  pa 


Recreation  penalty  of  Fort  Peck  pool: 

//FTPK/PNLTY_REC/01JAN1960/lMON/5Y0D/ 

Hydropower  capacity  penalty  of  Fort  Peck  pool: 

//FTPK/PNLTYJHPC/01JAN1960/1MON/5Y0D/ 

Total  penalty  of  Fort  Peck  pool  using  composite  computed  function: 
//FTPK/PNLTY_CMP/01JAN1960/lMON/5Y0D/ 

Total  penalty  of  Fort  Peck  pool  using  composite  edited  function  (used  in  the 
HEC-PRM  model: 

//FTPK/PNLTY_EDT  /0 1 J  AN 1 960/1 MON/5  Y  0D/ 


Recreation  penalty  of  Fort  Peck  release: 

//FTPK-GARR/PNLTY_REC/01JAN1960/lMON/5Y0D/ 

Energy  penalty  of  Fort  Peck  hydropower  release  using  computed  function: 
//FIPK-GARR/PNLTY_HPE/01JAN1960/lMON/5Y0D/ 

Energy  penalty  of  Fort  Peck  hydropower  release  using  edited  function: 
//FTPK-GARR/PNLTY_HPE_EDT/01  JAN 1 960/1MON/5  YOD/ 

Total  penalty  of  Fort  Peck  release  using  composite  computed  penalty  function: 
//FTPK-GARR/PNLT  Y_CMP/0 1  JAN 1 960/1 MON/5  YOD/ 

Total  penalty  of  Fort  Peck  release  using  the  edited  composite  penalty 
function: 

//FTPK-GARR/PNLTY_EDT/01JAN1960/lMON/5Y0D/ 

Navigation  penalty  of  Sioux  City  flow: 

//SUX-OMA/PNLTY_NAV/01JAN1960/1MON/5YOD/ 
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Writing  Hydropower  and  Duration  Results  To  DSS  by  MATHPK 


MATHPK  calculates  and  writes  computed  power  and  duration  results  to  the 
same  output  DSS  data  file  that  the  converted  results  (e.g.  elevation  or  flow  in 
cfe)  and  penalty  histograms  are  written.  For  example,  if  HEC-PRM  write 
results  to  I5Y0D.DSS,  MATHPK  reads  that  file,  converts  data  (e.g.  storage  to 
elevation  or  time  series  penalties),  and  stores  the  results  in  the  file 
I5YODO.DSS.  MATHPK  also  computes  hydropower  and  duration  data  and 
stores  it  to  the  file  I5YODO.DSS. 

MRD  hydropower  calculations  utilize  time  series  data,  such  as  elevation  and 
flow,  as  well  as  the  coefficients  "A"  and  "B"  as  defined  in  MRD’s  Long 
Range  Planning  Model  Program  Description.  The  also  utilize  tables  of 
elevation  versus  power  capacity.  Elevations  and  flows  are  computed  by  HEC- 
PRM  and  MATHPK  macros.  The  coefficients  and  tables  are  entered  by  the 
analyst  using  DSSPD  and  the  pathname  parts  are  described  earlier.  Duration 
results  utilize  a  table  of  class  intervals  to  calculate  the  number  of  occurrences 
within  each  class,  the  cumulative  totals,  and  the  percent  exceedance  for  each 
interval.  The  tables  of  class  intervals  may  be  entered  manually  or  calculated 
by  MATHPK,  but  they  must  be  stored  in  the  DSi>  data  file  PENCMP.DSS. 

Various  MATHPK  macros  compute  time  series  histograms  of  power  and 
paired  data  functions  of  duration.  The  following  pathname  parts  are  used  for 
hydropower  regular  interval  time  series  results: 

Part  Description 

A  Leave  Blank. 

B  The  node  identifier  of  the  reservoir  (e.g.  "FTPK"). 

C  The  parameter  identifier  -  "ENERGY"  for  energy  generated 

and  "POWER_PEAK"  for  peak  power. 

D  &  E  Standard  pathname  parts  for  regular  interval  time  series  data. 

F  Identifies  the  alternative  being  studied.  It  is  taken  from  the 

ZW  record  in  the  HEC-PRM  ASCII  input  data  file. 
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Various  MATHPK  macros  compute  duration  functions  and  store  them  as 
paired  data.  The  calculated  functions  include:  (1)  The  number  of  occurrences 
within  a  given  class  interval,  (2)  The  cumulative  total  occurrences  starting 
from  the  smallest  value,  (3)  The  cumulative  total  occurrences  starting  from 
the  highest  value,  (4)  The  number  of  values  (in  percent)  which  equal  or 
exceed  a  given  class  interval.  The  following  pathname  parts  are  duration 
paired  data  functions: 

Part  Description 

A  Leave  Blank. 

B  For  reservoir  storage,  the  node  identifier  of  the  reservoir 

(e.g.  "FTPK").  For  flows  (channel,  release,  etc.)  the 
upstream  ("from")  node  and  downstream  ("to")  node 
identifiers  (e.g.  "FTPK-GARR"). 

C  The  parameter  identifier  and  type  of  duration  calculation. 

The  first  variable  is  the  parameter  (e.g.  "ELEV”  for 
elevation)  and  the  second  variable  identifies  the  type  of 
duration  function.  The  duration  functions  include  (shown 
with  the  parameter  "ELEV"  for  example):  "ELEV- 
NU_INCLASS"  contains  the  number  of  occurrences  within  a 
given  class  interval,  "ELEV-NU_INCLASS_CUMLO" 
contains  the  cumulative  number  of  occurrences  within  a 
given  class  starting  with  the  lowest  value,  "ELEV- 
NU_INCLASS_CUMHI"  contains  the  cumulative  number  of 
occurrences  within  a  given  class  starting  with  the  highest 
value,  and  "ELEV-NU_INCLASS_CUMHI_PCT"  contains 
the  number  of  values  (in  percent)  which  equal  or  exceed  a 
given  class  interval. 

D  &  E  Leave  blank. 

F  Identifies  tbe  alternative  being  studied  It  is  taken  from  the 

ZW  record  in  tbe  HEC-PRM  ASCII  input  data  file. 
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The  following  are  example  uses  of  pathname  parts  for  the  MRD  study  where 
the  alternative  identifier  from  the  ZW  record  is  "5Y0D":: 


Peak  power  at  Fort  Peck: 

//FTPK/POWER_PEAK/01JAN1960/1MON/5YOD/ 


Energy  generated  at  Fort  Peck: 

//FTPK/ENERG  Y/01  JAN 1 960/1MON/5  YOD/ 


Duration  analysis  of  Fort  Peck  Pool  elevation: 
//FTPK/ELEV-NU_INCLASS///5Y0D/ 

//FTPK/ELE  V -NU_IN  CLAS  S_CTJMLO///  5  Y  OD/ 
//FTPK/ELEV-NU_INCLASS_CUMHI///5  YOD/ 
//FTPK/ELEV-NU_INCLASS_CUMHI_PCT///5Y0D/ 


Duration  analysis  of  Fort  Peck  Release: 

//FTPK-GARR/FLOW-NU_INCLASS///5YOD/ 
//FTPK-GARR/FLO  W-NU_INCLASS_CUMLO///5  YOD/ 
//FTPK-GARR/FLOW-NU_INCLASS_CUMHI///5YOD/ 
//FTPK-GARR/FLOW-NU_INCLASS_CUMHI_PCT///5YOD/ 
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Evaporation  KCFS  Evaporation  out  of  the  reservoir. 

KAF  //tVEVAP(KAF)/01  JAN1 960/1  MON/@/ 

CMS 
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Hydropower-  MW  //h/POWER_PEAK/01JAN1 960/1  MON/@/  |  Peak  hydropower  capacity  at  reservoir  "b". 

Capacity  i 


Elevation- Area-  FT-AC-AF  //tVEL-AR(AC)-CAP(AF)////  Elevation-area-eapacity  curve  for  a  reservoir. 

Capacity  FT-KAC-  /AVEL-AR-CAP//// 
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Purpose  of  RDATAO 

RDATAO  reads  MRD’s  file  "DATAO"  and  stores  the  data  in  a  HECDSS  data 
file.  RDATAO  is  tailored  specifically  to  the  format  of  this  file  —  all  data  is 
read  in  a  "fixed  format”.  It  stores  monthly  inflow,  depletions,  and  evaporation 
rates.  It  reads  yearly  evaporation  rates  from  "DODATA"  and  distributes  it 
amongst  the  months  by  an  internally  stored  distributioa  Any  changes  to  this 
distribution  must  be  made  internally  to  the  program. 

Copying  the  Program  onto  Your  Hard  Disk 

Use  the  "pkunzip.exe"  utility  to  retrieve  and  uncompress  the  program  from 
diskette.  If  "pkunzip.exe"  does  not  already  exist  on  your  system,  copy  it  from 
the  diskette  onto  your  fixed  disk  drive  (hard  disk).  Normally,  it  would  be 
copied  into  the  "C:\HECEXE"  subdirectory  and  the  "path"  command  in  your 
"C:\AUTOEXECJBAT"  file  would  contain  a  reference  to  this  subdirectory. 

To  retrieve  the  program  from  diskette  in  drive  "a:"  and  store  it  on  your  fixed 
disk  drive  in  subdirectory  "c:\hecexe",  enter  the  following  command: 

pkunzip  arrdataO  c:\hecexe  rdata0.exe 

Make  sure  you  use  the  character  "zero"  as  the  last  character  in  the  name 
"RDATAO"  (as  opposed  to  the  letter  "oh”). 

Copying  Example  Data  onto  Your  Hard  Disk 

To  copy  the  example  input  data  file  "rdataO.in"  onto  your  fixed  disk  drive 
(hard  disk)  from  the  floppy  diskette  drive  "a:",  enter  the  following  command: 
pkunzip  a:idataOin  rdataO.in 

This  will  store  the  example  data  in  your  default  directory  (the  directory  in 
which  you  were  at  the  time  of  issuing  the  command). 


Preparing  the  Input  data  file. 

The  user  need  not  make  any  changes  to  the  existing  "DATAO"  file  — 
"RDATAO"  can  read  it  without  modifications.  The  following  is  an  example 
section  of  the  file  "DATAO". 


1898 

1 

2.30 

1.79 

1 . 61 

1.12 

1.51 

1.17 

EVAP 

1898 

11 

419 

776 

1529 

2786 

1342 

386 

320 

353 

339 

313 

232 

232 

413 

1898 

12 

718 

1228 

2066 

4478 

2245 

816 

607 

458 

309 

186 

272 

280 

557 

1898 

13 

8  65 

478 

396 

473 

300 

71 

98 

46 

180 

6 

12 

36 

1022 

1898 

14 

151 

111 

240 

63 

190 

24 

32 

14 

58 

2 

4 

14 

510 

1898 

15 

143 

119 

130 

131 

80 

70 

75 

99 

91 

75 

73 

93 

141 

1898 

16 

220 

149 

478 

252 

129 

99 

71 

28 

24 

16 

10 

42 

194 

1898 

17 

81 

27 

153 

207 

72 

90 

90 

81 

63 

90 

99 

54 

45 

1898 

18 

279 

93 

527 

713 

249 

310 

310 

279 

217 

310 

341 

186 

155 

1898 

19 

540 

180 

1020 

1380 

480 

600 

600 

540 

420 

600 

660 

360 

300 

1898 

20 

992 

544 

1472 

384 

288 

320 

416 

416 

288 

320 

192 

128 

704 

1898 

21 

2108 

1156 

3120 

816 

612 

680 

884 

884 

612 

680 

408 

272 

1496 

1898 

31 

32 

-122 

-459 

-715 

-122 

49 

122 

75 

94 

56 

113 

132 

38 

1898 

32 

102 

-10 

-168 

-617 

-292 

-25 

-32 

-7 

71 

38 

47 

39 

102 

1898 

33 

-117 

-80 

-18 

-75 

-35 

-14 

-7 

-1 

-2 

10 

4 

-9 

-143 

1898 

34 

-27 

-22 

-39 

-13 

-15 

-5 

-6 

-3 

-3 

0 

-1 

-2 

-27 

1898 

35 

-15 

-6 

-17 

-18 

-16 

-14 

-15 

-20 

-9 

3 

3 

2 

-15 

1898 

36 

-16 

-21 

-10 

-24 

-26 

-20 

-4 

0 

0 

0 

0 

0 

-16 

1898 

37 

-8 

-3 

-15 

-21 

-7 

-O 

0 

0 

0 

0 

0 

0 

-5 

1898 

38 

-112 

-32 

-211 

-264 

-75 

0 

u 

-21 

-32 

-32 

-32 

-74 

-62 

1898 

39 

0 

-50 

-171 

-402 

-  1  :v 

-  j  Cti , 

It 

0 

O 

0 

0 

0 

0 

1898 

40 

-26 

-26 

-26 

-3  m 

tt 

0 

0 

0 

0 

-13 

-27 

1898 

41 

-111 

- 1 2  J 

-125 

t-. ' 

i 

.  1  J 

- 1 1  b 

-63 

-28 

-2  7 

-4  m 

-11  1 

HEC-PRM  Supplemental  Programs  (RDATAO) 


H  -  191 


December  1991 


1898 

51 

5000 

5400 

3800 

3100 

6200 

5500 

5300 

5500 

5800 

5400 

1899 

1 

2.30 

1.79 

1.61 

1.12 

1.51 

1.17 

EVAP 

1899 

11 

413 

746 

1411 

2563 

2181 

681 

414 

413 

480 

298 

309 

315 

504 

1899 

12 

557 

3328 

1422 

4301 

3994 

845 

451 

303 

341 

268 

337 

399 

1394 

1899 

13 

1022 

403 

480 

614 

232 

no 

239 

61 

77 

-61 

-95 

28 

778 

1899 

14 

510 

143 

125 

179 

67 

34 

75 

20 

24 

-38 

-58 

12 

186 

1899 

15 

141 

115 

126 

127 

77 

68 

73 

95 

87 

73 

77 

99 

149 

1899 

16 

194 

157 

381 

300 

91 

60 

46 

107 

89 

58 

30 

161 

577 

1899 

17 

45 

72 

333 

396 

369 

234 

81 

54 

54 

90 

81 

36 

108 

1899 

18 

155 

248 

1147 

1364 

1271 

806 

279 

186 

186 

310 

279 

124 

372 

1899 

19 

300 

480 

2220 

2640 

2460 

1560 

540 

360 

360 

600 

540 

240 

720 

1899 

20 

704 

224 

704 

352 

224 

128 

288 

224 

160 

160 

128 

96 

832 

1899 

21 

1496 

476 

1496 

748 

476 

272 

612 

476 

340 

340 

272 

204 

1768 

1899 

31 

38 

-141 

-423 

-769 

-312 

56 

141 

40 

50 

30 

60 

70 

20 

1899 

32 

102 

-10 

-168 

-617 

-292 

-25 

-32 

-7 

71 

38 

47 

39 

102 

1899 

33 

-143 

-80 

-18 

-75 

-35 

-14 

-7 

-1 

-2 

77 

111 

-7 

-195 

1899 

34 

-27 

-29 

-25 

-36 

-13 

-7 

-15 

-4 

-3 

0 

0 

-2 

-27 

1899 

35 

-15 

-6 

-17 

-18 

-15 

-14 

-15 

-19 

-11 

3 

3 

2 

-15 

1899 

36 

-16 

-21 

-18 

-24 

-18 

0 

0 

-6 

-6 

0 

0 

-5 

-16 

1899 

37 

-5 

-7 

-27 

-40 

-27 

-11 

0 

0 

0 

0 

0 

0 

-11 

1899 

38 

-62 

-99 

-229 

-246 

-75 

0 

0 

-21 

-32 

-32 

-32 

-50 

-149 

1899 

39 

0 

-50 

-171 

-402 

-251 

-131 

0 

0 

0 

0 

0 

0 

0 

1899 

40 

-27 

-22 

-30 

-35 

-4 

0 

0 

0 

0 

0 

0 

-10 

-30 

1899 

41 

-111 

-119 

-129 

67 

104 

126 

213 

-116 

-63 

-28 

-27 

-46 

-111 

1899 

51 

5400 

5100 

2600 

2100 

3200 

4000 

5500 

5900 

5800 

4600 

{additional  data  deleted} 


Executing  the  program. 

To  execute  the  program,  you  must  define  the  input  data  file  and  die  output 
HECDSS  data  file  on  the  execution  line.  If  you  use  the  "MENUPRM”,  it  will 
help  you  in  defining  die  files.  From  the  standpoint  of  MENUPRM,  the  file 
"DODATA"  should  be  stored  on  your  hard  disk  with  the  extension  "DOD". 

To  run  it  from  the  DOS  prompt,  you  must  enter  the  programs  name  followed 
by  file  assignments.  For  example,  to  use  the  above  example  file  named 
"RDATA0.IN"  and  store  it  an  HECDSS  date  file  named  "EXAMPLE.DSS", 
enter  the  following  command  at  the  DOS  prompt: 


RDATAO  D=RDATA0 . IN  DSS=EXAMPLE 
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Example  Output  From  RDATAO 

Period  of  Record 

— 

- DSS  — 

-ZOPEN:  Existing  File  Opened,  File:  TSIN.DSS 

Unit:  71/  DSS  Version:  6-GO 

Enter  year  of 

depletions:  1991 

EVAP 

RECORD: 

1898 

1 

2.30  1.79 

1.61 

1.12  1.51 

1.17 

EVAP 

51 

RECORD: 

1898 

51 

5000  5400  3800  3100 

6200 

5500  5300  5500  5800 

5400 

EVAP 

RECORD : 

1899 

1 

2.30  1.79 

1.61 

1.12  1.51 

1.17 

EVAP 

51 

RECORD: 

1899 

5a 

5400  5100  2600  2100 

3200 

4000  5500  5900  5800 

4600 

EVAP 

RECORD : 

1900 

1 

2.30  1.79 

1.61 

1.12  1.51 

1.17 

EVAP 

51 

RECORD: 

1900 

51 

4600  4500  3500  3500 

5000 

4800  4800  5000  6000 

3800 

EVAP 

RECORD : 

1901 

i 

2.30  1.79 

1.61 

1.12  1.51 

1.17 

EVAP 

51 

RECORD: 

1901 

51 

3800  2800  5300  3400 

6200 

6200  5900  5100  5000 

3800 

EVAP 

RECORD: 

1902 

1 

2.30  1.79 

1.61 

1.12  1.51 

1.17 

EVAP 

51 

RECORD: 

1902 

51 

3800  3600  3700  2300 

2700 

4400  4100  3800  5200 

3200 

EVAP 

RECORD: 

1903 

1 

2.30  1.79 

1.61 

1.12  1.51 

1.17 

EVAP 

51 

RECORD: 

1903 

51 

3200  4200  2500  2100 

4500 

3400  3400  4600  5200 

4400 

EVAP 

RECORD: 

1904 

i 

2.30  1.79 

1.61 

1.12  1.51 

1.17 

EVAP 

51 

RECORD: 

1904 

51 

4400  3000  2500  2100 

2900 

4700  5300  5300  5000 

3200 

EVAP 

RECORD: 

1905 

i 

2.30  1.79 

1.61 

1.12  1.51 

1.17 

EVAP 

51 

RECORD: 

1905 

51 

3200  3600  2800  2500 

3400 

4200  4000  4700  5400 

4600 

EVAP 

RECORD : 

1906 

i 

2.30  1.79 

1.61 

1.12  1.51 

1.17 

EVAP 

51 

RECORD: 

1906 

51 

4600  3000  3900  4200 

5400 

5200  5500  5400  4800 

4200 

EVAP 

RECORD: 

1907 

i 

2.30  1.79 

1.61 

1.12  1.51 

1.17 

EVAP 

51 

RECORD: 

1907 

51 

4200  4300  5800  2400 

3000 

3400  5200  5900  5200 

4000 

EVAP 

RECORD: 

1908 

i 

2.30  1.79 

1.61 

1.12  1.51 

1.17 

EVAP 

51 

RECORD: 

1908 

51 

4000  5400  3900  2100 

3300 

4400  5200  5200  6000 

3200 

{additional  data  deleted} 

EVAP 

RECORD: 

1984 

1 

3.62  2.72 

2.60 

3.06  2.60 

3.17 

EVAP 

51 

RECORD: 

1984 

51 

1800  2600  2100  3000 

2900 

6200  6000  6200  6000 

6200 

EVAP 

RECORD: 

1985 

1 

3.28  2.40 

2.65 

3.08  2.84 

2.49 

EVAP 

51 

RECORD: 

1985 

51 

6200  1900  6200  6000 

6000 

6200  6000  6200  6000 

6200 

EVAP 

RECORD: 

1906 

i 

2.81  2.20 

2.11 

2.62  2.52 

2.16 

EVAP 

51 

RECORD: 

1986 

51 

6200  2300  2900  2700 

2500 

2432  2800  2900  2800 

6200 

EVAP 

RECORD: 

1987 

i 

2.77  2.44 

2.51 

3  2.68 

2.70 

EVAP 

51 

RECORD: 

1987 

51 

1839  2272  1982  6000 

6200 

1939  6200  6200  6200 

6200 

EVAP 

RECORD: 

1988 

1 

3.49  2.63 

2.97 

4  3.03 

3.21 

EVAP 

51 

RECORD: 

1988 

51 

6200  6000  6200  6000 

6200 

6200  6200  6200  6000 

6200 

EVAP 

RECORD: 

1989 

1 

3.48  2.93 

3.29 

3  3.19 

3.50 

EVAP 

51 

RECORD : 

1989 

51 

6200  6000  6200  6000 

6200 

6200  6200  6200  6000 

6200 

Idenlif icat ion  "  net  found!  tied: 

01 

— 

-DSS - ZWP.ITE  Unit  71;  V-=rc. 

4  : 

/ 'FTPK /EVAP  RATE/01 JANl 890/ 1MON// 

— 

-DSS - ZWF  I TE  Un  l  ;  V*  r  ;• . 

4  : 

' /FTPK/EVAP  RATE/01 JAN 1900/1 MON// 

-DSS - ZWP.ITE  Ui.i  *  "1;  7*i«. 

4  : 

/  '  FTPK  -'FVAP  RATE/01  JAN1 91 0/1MON// 
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DSS- 

— Z WRITE 

Unit 

71; 

Vers  . 

4 

DSS- 

— 2 WRITE 

Unit 

71; 

Vers . 

4 

DSS- 

— Z WRITE 

Unit 

71; 

Vers . 

4 

DSS- 

— Z WRITE 

Unit 

71; 

Vers . 

4 

DSS* 

— Z WRITE 

Unit 

71; 

Vers . 

4 

DSS- 

~ ZWRITE 

Unit 

71; 

Vers . 

4 

DSS- 

— ZWRITE 

Unit 

71; 

Vers . 

4 

DSS- 

— ZWRITE 

Unit 

71; 

Vers . 

4 

DSS- 

—ZWRITE 

Unit 

71; 

Vers . 

4 

DSS- 

— ZWRITE 

Unit 

71; 

Vers . 

4 

DSS- 

--ZWRITE 

Unit 

71; 

Vers  . 

4 

DSS- 

— ZWRITE 

Unit 

71; 

Vers . 

4 

DSS- 

— ZWRITE 

Unit 

71; 

Vers  . 

4 

//FTPK/EVAP_RATE/01JAN1920/1MON// 
//FTPK/EVAP_RATE/01 JANl 930/ 1MON// 
//FTPK/EVAP_RATE/01JAN1940/1MON// 

//ftpk/evap_rate/cijah1950/imon// 

/ /FTPK/EVAP_RATE/ 01 JANl 960 / 1MON/ / 
//FTPK/EVAP_RATE/01JAN1970/1MON// 
//FTPK/EVAP_RATE/01JAN1980/1MON// 
//FTPK/EVAP_RATE/01JAN1990/1MON// 
//FTPK/EVAP_RATE/01  JANl  800/1  YEAR// 
//FTPK/EVAP_RATE/ 01 JANl 900/1 YEAR// 
//GARR/EVAP_RATE/01JAN1890/1MON// 
//GARR/EVAP_RATE/01JAN1900/1MON// 
//GARR/EVAP  RATE/ 01 JANl 910/ 1MON/ / 


{additional  data  deleted} 


— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

7 1 ;  Vers . 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

—ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Ve  r  s . 

4 

— DSS- 

—  ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

—ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

—  ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

—ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

—  ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

—ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

—  ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

—  ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

- -DSS- 

—  ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

—  ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

--ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

—ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

—ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

—  ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

—DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

— DSS- 

— ZWRITE 

Unit 

71;  Vers. 

4 

/ /GARR/FLOW_LOC_INC/Ol JANl 980/ 1MON// 
/ / GARR/ FLOWLOCI NC / 0 1 JAN 1990/ 1MON / / 
/ / OAHE/FLOW_LOC_INC/ 0 1 JANl 890/ 1MON/ / 
/ / O AHE / FLOW_LOC_ INC/01 JAN1900/1 MON// 
/ /OAHE/FLOW_LOC_I NC/01 JANl 910/ 1MON// 
/ /OAHE/FLOW_LOC_INC/Ol JANl 920/ 1MON/ / 
/ / OAHE/FLOW_LOC_INC/01 JANl 930/ 1MON/ / 
/ / OAHE/FLOW_LOC_I NC/01 JANl 940/ 1MON/ / 
//OAHE/FLOW_LOC_INC/01JAN1950/1MON// 
/ / OAHE / F LOW_LOC_I NC / 0 1 J AN 1 9 6 0 / 1MON / / 
/ / OAHE / FLOW_LOC_ I NC / 0 1 JAN 1970/1 MON// 
/ / OAHE / FLOW_LOC_I NC / 0 1 JANl 9 8 0 / 1 MON / / 
/ / OAHE / FLOW_LOC_I NC / 0 1 JAN 1 9 90 / 1MON / / 
//FTRA/FLOW_LOC_INC/Ol JANl 890/ 1MON// 
/ / FTRA / FLOW_LCC_I NC / 0 1 JAN 1900/1 MON / / 
/ / FTRA/ FLOW_LOC_I NC / 0 1 JAN 1 9 1 0 / 1MON/ / 
/ / F T RA / F LOW_LOC_ I NC / 0 1 JAN 1 9 2 0 / 1 MON / / 
// FTRA/ FLOW_LOC_I NC/ 0 1 JANl 930 / 1MON/ / 
//FTRA/FLOW  T.OC_INC/01  JAN1940/1MON// 
//FTRA/FLOW_LOC_INC/01JAN1950/1MON// 
/'/ FTRA/FLOW_LOC_INC/Ol JANl 960/ 1MON// 
//FTRA/FLOW_LOC_INC/Ol JANl 970/ 1MON// 
/ / FTRA / FLOW_LOC_I NC / 0 1 JAN 1 98 0 / 1MON / / 
/ / F TRA / F LOW_LOC_I NC / 0 1 JAN 1 9 9 0 / 1MON / / 
//GAPT/FLOW_1,OC_INC/01JAN18  90/1MON// 
//GAPT/FLOW_LOC_INC/Ol JANl 900/ 1MON// 
//GAPT/FLOW_LOC_INC/Ol JANl 910/ 1MON// 
//GAPT/FLOW_LOC_INC/01JAN1920/1MON// 
/ / GAPT/FLOW_LOC  INC/01JAN1930/1MON// 

//gapt/flow2loc_inc/oijani940/imon// 

/ /GAPT/FLOW_LOC_INC/Ol JANl 950/ 1MON// 
/  / GAP T /  FLOW__LOC_I NC/01  JANl  960/  1MON/  / 
/ / GAPT/ FLOW_LOC_I NC/01 JAN 1970/1 MON / / 
/ /GAPT/FLOW_LOC_INC/01 JANl 980/ 1MON// 
/ / GAPT / FLOW_LOC_I NC/01 JAN 1990/1 MON / / 
/ / SUX / FLOW_LOC_I NC / 0 1 JAN 1890/ 1MON / / 
//SUX/FLOW_LOC_INC/01 JANl 900/ 1MON// 

/ / SUX/FLOW_LOC_INC/01 JANl 910/ 1MON// 

/ /SUX/FLOW_LOC__INC/ 01  JANl  920/1MON// 
//SOX/FLOW_LOC_INC/U1JAN1930/1MON// 

/ /SUX/FLOW_LOC_INC/01 JANl 940 /1MON// 
//SUX/FLOW_LOC_INC/01JAN1950/1MON// 
//SUX/FLOW  LOC  INC/01 JAN1960/1MON/ / 


{additional  data  deleted} 


DSS — 

-ZWRITE 

Unit 

71; 

Vers . 

4 

DSS— 

-ZWRITE 

Unit 

71; 

Vers  . 

4 

DSS — 

-ZWRITE 

Unit 

71; 

Vers . 

4 

DSS  — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

DSS  — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

DSS  — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

DSS — 

-ZWRITE 

Unit 

71; 

Vers  . 

1 

DCS — 

-ZWRITE 

Unit 

71; 

Vers. 

1 

DSS — 

-ZWRITE 

Unit 

71; 

Ve  r  n . 

1 

DSS  — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

DSS — 

-ZWRITE 

Un  it 

71; 

Ve  r  s . 

1 

DSS  — 

-ZWRITE 

Unit 

71  ; 

Vers. 

1 

DSS  — 

-ZWRITE 

Unit 

71; 

Ve  r  s  . 

1 

DSS  — 

-ZWRITE 

Unit 

71; 

Vers. 

1 

DSS  — 

-ZWRITE 

Unit 

71; 

Ve  rs . 

1 

DSS— 

-ZWRITE 

Un  i  t 

71  ; 

Ve  r  s  . 

1 

DSS  — 

-Z WRITE 

Un  i  t 

71; 

Vers . 

1 

DCS  — 

-ZWPITF 

Unit 

7  1  ; 

Vers  . 

1 

DSC  — 

-ZWPITE 

n». ;  ► 

V  ::  . 

r  rr  — 

-CWPTTF 

'  ■  r .  i  r 

rr:'  — 

-  ?  WP  I  TF. 

r  T ;  i  r 

Wj: !  TF 

r': . ;  r 

/ / HEMO/ FLOW_LOC_I NC / 0 1 JANl 9 7 0 / 1MON/ / 

// HEMO/FLOW_LOC_I NC/01 JANl 98 0/1MON// 

/ / HEMO / FLOW_ LOC_ I NC / 0 1 JAN 1990/1 MON / / 

/ /FTPK/FLOW_LOC_DPL/ 01 JANl 8  90/ 1MON/ 1 991 / 
/ /FTPK/FLOW_LOC_DPL/0 1 JANl 900 /1MON/ 1991/ 
//FTPK/FLOW_LOC_DPL/01 JANl 910 /1MON/ 1991/ 
/ /FTPK/FLOW_LOC_DPL/Ol JANl 920/ 1MON/ 1991/ 
/ /FTPK/FLOW_LOC_DPL/01 JAN1930 / 1MON/ 1 991 / 
/ /FTPK/FLOW_LOC_DPL/01 JANl 940/ 1MON/ 1991/ 
/ /FTPK/FLOW_LOC_DPL/0 1 JANl 950 /1MON/ 1991/ 
//FTPK/FLOW_LOC_DPL/ 01 JANl 960/lMON/ 1 991 / 
//FTPK/FLOW_LOC_DPL/01 JANl 970/ 1MON/ 1991/ 
/  /FTPK/FLOW_LOC_DPL/Ol JANl 980 /1MON/ 1991 / 
/ / FTP  K / F  LOW_LOC_DP  L / 0 1 JAN 1990/1 MON / 1 9  9 1 / 
/ • GARR / F LOW_LOC_DP L / 0 1 JAN 18  90/1 MON / 1 9  9 1 / 
'  GARR  i  F LOW_LOC _DP L /  0 1  JAN  1  900  /  1  MON  / 1 991  / 
/  '  GARP. / F LOW_ \fjr  DP L / 0 1  JAN  1910/1  MON /  1  9 9 1  / 
•  / GAP.P  / F L-W_  L-  •C  "DPL /  0 1  JAN  1  920  /  ■»  MON  /  1991  / 

p  p  •  f  l'  k  l--  --  '  r  -f  l  -  0 1  j  an  1 9  j ».» /  i  m- n  / 1 9  9 1  - 

f  r  w  l.  -  •  DPI.'  i-l  JAN  1  94  H  /  1  M-  N  /  1  »  ‘  1 

:;-pr  ft  w -  'f-pt ./ "i  v-.ru  -  im-’' u  ■  1 0,>i 
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- DSS  — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

- DSS-- 

-ZWRITE 

Unit 

71; 

Vera  . 

1 

- DSS  — 

-ZWRITE 

Unit 

71; 

Vera . 

1 

- DSS-- 

-ZWRITE 

Unit 

71; 

Vera  . 

1 

- DSS-- 

-ZWRITE 

Unit 

71; 

Ver  a . 

1 

- DSS-- 

-2WRITE 

Unit 

71; 

Vers . 

1 

- DSS — 

-ZWRITE 

Unit 

71; 

Vera  . 

1 

- DSS-- 

-ZWRITE 

Unit 

71; 

Vers . 

1 

- DSS  — 

-ZWRITE 

Unit 

71; 

Vers  . 

1 

- DSS  — 

-ZWRITE 

Unit 

71; 

Vera. 

1 

- DSS-- 

-ZWRITE 

Unit 

71; 

Vera . 

1 

- DSS- - 

-ZWRITE 

Unit 

71; 

Ver  s . 

1 

- DSS-- 

-ZWRITE 

Unit 

71; 

Ver  a . 

1 

- DSS  — 

-ZWRITE 

Unit 

71; 

Vera . 

1 

- DSS- - 

-ZWRITE 

Unit 

71; 

Vera  . 

1 

- DSS - - 

-ZWRITE 

Unit 

71; 

Vera . 

1 

- DSS- - 

-ZWRITE 

Unit 

71; 

Vers . 

1 

- DSS - - 

-ZWRITE 

Unit 

71 ; 

Vers . 

1 

- DSS-- 

-ZWRITE 

Unit 

71; 

Vers . 

1 

- DSS - - 

-ZWRITE 

Unit 

71; 

Vers . 

1 

- DSS- - 

-ZWRITE 

Unit 

71; 

Vers . 

1 

- DSS-- 

-ZWRITE 

Unit 

71; 

Vers . 

1 

- DSS-- 

-ZWRITE 

Unit 

71; 

Vera  . 

1 

- DSS  — 

-ZWRITE 

Unit 

71; 

Ver  s . 

1 

- DSS  — 

-ZWRITE 

Unit 

71; 

Vera  . 

1 

- DSS  — 

-ZWRITE 

Unit 

71; 

Vera . 

1 

/  /  GAR  R  /  F  LOW_LOC  _D  P  L  /  0 1 J  AN  1  9  7  0  / 1  MON  / 1  9  9 1  / 
//GARR/FLOW_LOC_DPL/Ol JAN1 980/ 1MON/ 1 991 / 
/ / GARA/ FLOW_LOC_DP L / 0 1 J AN 1 9 9 0 / 1 MON / 1 9 9 1 / 
//OAHE/FLOW_LOC_DPL/Ol JAN1 8 90 / 1MON/ 1 991 / 
/ /OAHE / FLOW_LOC_DPL/ 0 1 JAN  1  900/1 MON / 1 9  9 1 / 
//OAHE/FLOW_LOC_DPL/01JAN1910/1MON/1991/ 
//OAHE/FLOW_LOC_DPL/01JAN1920/1MON/1991/ 
/ / OAHE / FLOW_LOC_DP L/ 0 1 J AN  1 93 0 / 1 MON / 1 9 9 1 / 
//OAHE/FLOW_LOC_DPL/01JAN1940/1MON/1991/ 
//OAHE'FLOW_l/V'_DPL/01  JAN1950/1MON/1991/ 
//OAHE/FLOW_LOC_DPL/Ol JAN1 960/ 1MON/ 1 991 / 
//OAHE/FLOW_LOC_DPL/Ol JAN  1 97  0/ 1MON/ 1991/ 
//OAHE/FLOW_LOC_DPL/Ol JAN1 980/ 1MON/ 1 991 / 
//OAHE/FLOW_LOC_DPL/01JAN1 990/ 1MON/ 1 991 / 
//FTRA/FLOW_LOC_DPL/Ol JAN1 890/ 1MON/ 1 991 / 
//FTRA/FLOW_LOC_DPL/Ol JAN1 900/ 1MON/ 1991/ 
//FTRA/FLOW_LOC_DPL/Ol JAN1 91 0/ 1MON/ 1 991 / 
/ / FTRA/ FLOW_LOC_DP  L/ 0 1 J AN  1920/1 MON / 1991/ 
/ /FTRA/FLOW_LOC_DPL/0 1 JAN  1 93  0/ 1MON/ 1991/ 
/ /FTRA/FLOW_LOC_DPL/0 1 JAN1 940 / 1MON/ 1991/ 
//FTRA/FLOW_LOC_DPL/Ol JAN1 950/ 1  MON/ 1 991 / 
//FTRA/FLOW_LOC_DPL/01JAN1 960/ 1MON/ 1991/ 
//FTRA/FLOW_LOC_DPL/01JAN1970/1MON/1991/ 
//FTRA/FLOW_LOC_DPL/01 JAN1 980/ 1MON/ 1 991 / 
//FTRA/FLOW_LOC_DPL/01JAN1 990 / 1MON/ 1 991 / 
//GAPT/FLOW  LOC  DPL/ 01 JAN1 890/ 1MON/ 1 991 / 


{additional  data  deleted} 


--DSS- 

--ZWRITE 

Unit 

71; 

Vera 

--DSS- 

--ZWRITE 

Unit 

71; 

Vera 

--DSS- 

— ZWRITE 

Unit 

71; 

Vera 

— DSS- 

--ZWRITE 

Unit 

71; 

Vera 

—  DSS- 

--ZWRITE 

Unit 

71; 

Vera 

--DSS- 

— ZWRITE 

Unit 

71; 

Vers 

--DSS- 

--ZWRITE 

Unit 

71; 

Vers 

--DSS- 

--ZWRITE 

Unit 

71; 

Vers 

-  -  D  S  S  - 

--ZWRITE 

Unit 

71; 

Vers 

—  DSS- 

--ZWRITE 

Unit 

71; 

Vers 

- -DSS - 

--ZWRITE 

Unit 

71; 

Vers 

--CSS- 

--ZWRITE 

Unit 

71; 

Vers 

--DSS- 

--ZWRITE 

Unit 

71; 

Vers 

--DSS- 

--ZWRITE 

Unit 

71; 

Vers 

- D 

SS - Z’-’ LOSE  Unit: 

71, 

Pointer  Utilization 
Humber  of  Records: 
File  Size:  868 . 9 

Percent  Inactive: 


1 :  //BNMO/FLOW_LOC_DPL/01JAN1 970/ 1MON/ 1 991 / 

1 :  //BNMO/FLOW_LOC_DPL/01JAN19BO/1MON/1991/ 

1 :  //BNMO/FLOWJLOC_DPL/Ol JAN1 990/ 1MON/ 1991/ 

1 :  //HEMO/FLOW_LOC_DPL/01JAN1890/1MON/1991/ 

1 :  //HEMO/FLOW_LOC_DPL/OlJAN1909/lMON/1991/ 

1 :  //HEMO/FLOW_LOC_DPL/01JAN1910/1MON/1991/ 

1:  //HEMO/FLOW_LOC_DPL/01JAN1 920 /1MON/ 1991/ 

1:  //HEMO/FLOW_LOC_DPL/Ol JAN1 93 0/ 1MON/ 1 991 / 

1:  //HEMO/FLOW_LOC_DPL/01JAN1940/1MON/1991/ 

1:  //HEMO/FLOWJOOC  DPL/01 JAN1 950/ 1MON/ 1 991 / 

1 :  //HEMO/FLOW_LOC~DPL/01JAN1 960 /1MON/ 1991/ 

1 :  II HEMO /FLOW_LOC_DP  L /01J AN 1970/1 MON/1991/ 

1:  //HEMO/FLOW  LOC_DPL/0 1 JAN1 980 / 1MON / 1 991 / 

1:  //HEMO/F  LOW~LOC_DP  L/  01JAN199OMMON/1991/ 

File:  TSIN.DSS 
0.44 
695 

Kbytes 

0.0 
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Description  of  Location  Codes  in  the  Data  File  DODATA 


Line  ID 

Item 

Description 

1 

Evaporation 

Annual  evaporation  in  feet  beginning  in  March,  (e.g.  2.30  feet  for  R.  Peck  in 
Mar  1898) 

11-21 

Inflow 

Inflow  to  projects  in  1,000  Acre-Feet  beginning  in  March,  (e.g.  419  KAcre- 
Feet  inflow  to  Ft.  Peck  in  March  1898). 

11 

Ft.  Peck  Inflow  (FTPK) 

12 

Garrison  Inflow  (GARR) 

13 

Oahe  Inflow  (OAHE) 

14 

Ft.  Randall  A  Big  Bend  Inflow  (FTRA) 

15 

Gavins  Point  Inflow  (GAPT) 

16 

Sioux  City  Inflow  (SUX) 

17 

Omaha  Inflow  (OMA) 

18 

Nebraska  City  Inflow  (NCNE) 

19 

Kansas  City  Inflow  (MKC) 

20 

BoonviUe  Inflow  (BNMO) 

21 

Hermann  Inflow  (HEMO) 

21-41 

Depletions 

Depletions  from  projects  in  1,000  Acre-Feet  beginning  in  March,  (e.g.  32 
KAcre-Feet  depletion  from  R.  Peck  in  March  1898).  The  include  diversions. 

31 

FL  Peck  Depletion  (FTPK) 

32 

Garrison  Depletion  (GARR) 

33 

Oahe  Depletion  (OAHE) 

34 

Ft.  Randal]  A  Big  Bend  Depletion  (FTRA) 

35 

Gavins  Point  Depletion  (GAPT) 

36 

Sioux  City  Depletion  (SUX) 

37 

Omaha  Depletion  (OMA) 

38 

Nebraska  City  Depletion  (NCNE) 

39 

Kansas  City  Depletion  (MKC) 

40 

BoonviUe  Depletion  (BNMO) 

41 

Hermann  Depletion  (HEMO) 

51 

Limit 

Upper  limit  on  releases  from  Gavin’s  Point. 
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Evaporation  Ratos 

Distribution  of  evaporation 


Standard 

Time 

Period 

Beginning 

Period 

Time 

End-of- 

Period 

Time 

Array 

T15 

Row  # 

Evaporation 

Distribution 
(in  percent) 

1 

16MAR 

22MAR 

1 

0 

2 

23  MAR 

31  MAR 

2 

0 

3 

01APR 

30APR 

3 

0 

4 

01MAY 

31MAY 

4 

7 

5 

01JUN 

30JUN 

5 

5 

6 

01JUL 

31JUL 

6 

19 

7 

01AUG 

31  AUG 

7 

20 

8 

01SEP 

30SEP 

8 

19 

9 

01OCT 

31  OCT 

9 

13 

10 

OINOV 

15NOV 

10 

6 

11 

16NOV 

30NOV 

11 

6 

12 

01DEC 

31DEC 

12 

5 

13 

01JAN 

31  JAN 

13 

0 

14 

01  FEB 

28FEB 

14 

0 

15 

01MAR 

15MAR 

15 

0 
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Listing  of  Computer  Source  Code  for  RDATAO 


PROGRAM  RDDATAO 

Read  data  from  MRD,  dOdata  file 
include  'rdataO.cbl' 


CALL  ATTACH (5, ' INPUT' , 'SIDIN' , '  ' , CFNAME, IOER01) 

CALL  ATTACH <6, 'OUTPUT' , 'STDOOT' , '  ', CFNAME, IOER03) 

CINREC«='  DODATA' 

CALL  CHRLNB(CINREC,NINREC) 

CALL  ATTACH (1,* DODATA' , CINREC <1 tNINREC) , '  ' .CFNAME, IOER02) 

CINREC*' MRD . DSS' 

CALL  CHRLNB(CINREC.NINREC) 

CALL  ATTACH (71,'DSSFILE',C INREC {1 5 N INREC ) , ' NOP ' , CFNDSS , IOERO 4 ) 
CALL  ATTEND 

CALL  2SET (' PROG' , 'RDATAO' ,0) 

CALL  ZOPEN(IFLTAB, CFNDSS, IERR01) 

CALL  RDOSRI  () 

DO  1400  IULOC=l ,  NULOC 
DO  1400  JP«1,6 

CALL  CHRLNB  (CP  (  JP,  IULOC)  ,  NP  ( JP,  1ULOC)  ) 

1400  CONTINUE 

Read  Records  of  time  series  data  and  store  data  in  DSS  data  file 


CALL  RDD0DATA  () 

9000  CALL  ZCLOSE ( IFLTAB) 
STOP 
END 
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Block  Data  for  RDATAO 


BLOCK  DATA 


include  ' rdataO.cbl' 


DATA  KDLOC/22/ 

C 

DATA  IDENT(1)/11/,  CP<1,1>/'  ' /,  CP  (2, 1) /' FTPK' /, 

.CP (3,1) /'PLOW  LOC  INC'/,  CP (5, 1) /' 1MON' / ,  CP(6,1)/'  '/ 

DATA  IDENT(2)7l2/,  CP(1, 2)/'  ' /,  CP (2, 2) /'GARR' /, 

.CP (3, 2) /'FLOW  LOC  INC'/,  CP (5, 2) / ' 1MON' /,  CP<6,2)/'  '/ 

DATA  IDENT (3)713/ ,  CP(1, 3)/'  '/,  CP (2,3) /'OAHE' /, 

.CP  (3,3)/'  FLOW  LOC  INC'/,  CP  (5, 3) /' 1MON' /,  CP(6,3)/'  '/ 

DATA  IDENT(4)7l4/ ,  CP (1,4)/'  '/,  CP ( 2, 4) /' FTRA' /, 

.CP (3, 4) /'FLOW  LOC  INC'/,  CP (5, 4) /' 1MON' /,  CP(6,4)/'  '/ 

DATA  IDENT(5)7l5/,  CP(1, 5)/'  '/,  CP (2, 5) /'GAPT' /, 

.CP (3, 5) /'FLOW  LOC  INC'/,  CP (5, 5) /' 1MON' /,  CP(6,5)/'  '/ 

DATA  IDENT< ')7l6/,  CP(1, 6)/'  '/,  CP  (2, 6) /'  SOX' /, 

.CP  (3, 6) /'FLOW  LOC  INC'/,  CP  (5,  6) /' 1MON' /,  CP(6,6>/'  '/ 

DATA  IDENT  (7)717/,  CP(1, 7)/'  '/,  CP(2,7)/’OMA  '/, 

.CP  (3,  7) /'FLOW  LOC  INC'/,  CP  (5, 7) /' 1MON' /,  CP(6,7)/'  '/ 

DATA  IDENT(8)7l8/,  CP(1, 8)/'  '/,  CP (2, 8) /'NCNE' /, 

.CP (3, 8) /'FLOW  LOC  INC'/,  CP (5, 8) /' 1MON' /,  CP(6,8)/'  '/ 

DATA  IDENT(9)7l9/,  CP(1, 9)/'  '/,  CP(2,9)/'MKC  '/, 

.CP  (3,  9) /'FLOW  LOC  INC'/,  CP  (5,  9) /' 1MON' /,  CP(6,9)/'  '/ 

DATA  IDENT(10T/207,  CP(1, 10)/'  '/,  CP (2, 10) /'BNMO' /, 

.CP (3, 10) /'FLOW  LOC  INC'/,  CP (5, 10) /' 1MON' /,  CP(6,10>/'  '/ 

DATA  IDENT(U)721/,  CPU, 11)/'  '/,  CP  (2, 11)  /'  HEMO'  / , 

,CP(3,U)/'FLOW_LOC_INC'/,  CP  (5,  11) /' 1MON' /,  CP(6,11)/'  '/ 

C 

DATA  MX  LOC  DPL/12,22/ 

DATA  IDENT (T2)/31/,  CP(1, 12)/'  '/,  CP (2, 12) /'FTPK' /, 

.CP (3, 12) /'FLOW  LOC  DPL' /,  CP (5, 12) /' 1MON' /,  CP(6,12)/'  '/ 

DATA  IDENT(13)732/,  CP(1, 13)/'  '/,  CP (2, 13) /'GARR' /, 

.CP  (3,  13) /'FLOW  LOC  DPL'/,  CP  (5, 13) /' 1MON' /,  CPU, 13)/'  '/ 

DATA  IDENT (14) 733/,  CP(1, 14)/'  '/,  CP (2, 14) /'OAHE' /, 

.CP  (3,  14) /'FLOW  LOC  DPL'/,  CP  (5,  14) /'  1MON' /,  CPU, 14)/'  '/ 

DATA  IDENT (15)734/,  CP(1,15)/'  '/,  CP (2, 15) /' FTRA' /, 

.CP (3, 15) /'FLOW  LOC  DPL'/,  CP (5, 15) /' 1MON' /,  CP(6,15)/'  '/ 

DATA  IDENT (16)735/,  CP(1,16)/'  '/,  CP  (2, 16) /'GAPT' /, 

.CP  (3,  16) /'FLOW  LOC  DPL'/,  CP  (5,  16) /'  1MON' /,  CPU, 16)/'  '/ 

DATA  IDENT (17) 736/,  CP(1, 17)/'  '/,  CP (2 , 17) /' SDX  '/, 

.CP (3, 17) /'FLOW  LOC  DPL'/,  CP (5, 17) /' 1MON' /,  CP (6, 17)/'  '/ 

DATA  IDENT (18)737/,  CP(1. 18)/'  '/,  CP (2, 18) /' OMA  '/, 

.CP (3, 18) /'FLOW  LOC  DPL'/,  CP (5, 18) /' 1MON’ /,  CP(6,18)/'  '/ 

DATA  IDENT(19)738/,  CP(1, 19)/'  '/,  CP  (2, 19) /'NCNE' /, 

.CP  (3,  19) /'FLOW  LOC  DPL'/,  CP  (5, 19) /'  1MON'  /  ,  CPU, 19)/'  '/ 

DATA  IDENT (20)739/7  CP(1, 20)/'  '/,  CP (2, 20) /'MKC  '/, 

.CP  (3,  20)  /'  FLOW  LOC_DPL'/,  CP  (5, 20) /' 1MON' /,  CPU, 20)/'  '/ 

DATA  IDENT (21 >740/,  CP{1, 21)/'  '/,  CP (2, 21 ) /' BNMO' /, 

.CP (3,21) /'FLOW  LOC  DPL'/,  CP (5, 21) /' 1MON' /,  CP(6,21)/’  '/ 

DATA  IDENT (22) 741/,  CP(1, 22)/'  '/,  CP (2, 22) /' HEMO' /, 

■CP(3,22)/'FLOW_LOC_DPL'/,  CP (5, 22) /' 1MON' /,  CP(6,22)/'  '/ 

C 

DATA  IDENT (23) /  1/,  CP(1, 23)/'  '/,  CP(2,23>/'  '/, 

.CP (3, 23) /'EVAPORATE' /,  CP (5, 23) /' 1MON' /,  CP(6,23)/'  '/ 

C 

CCCCC  DATA  IDENT (8) /ll/ ,  CP(1, 8)/'  '/,  CP (2, 8) /' FTPK' /, 

CCCCC.CP(3,8) /'FLOW  '/,  CP (5, 8) /' 1MON' /,  CP ( 6, 8) /' XXXX' / 

C 

DATA  EVDIST/0 . , 0 . , 7 . , 5 . , 19. , 20 . ,  19. , 13. , 12 . , 5 . , 0. , 0. / 

C 

DATA  EVRESP (1,1)/'  '/,  EVRESP (2, 1) /' FTPK' /, 

.EVRESP(3,1)/'BVAP  RATE'/,  EVRESP (5, 1) /' 1MON' /,  EVRESP (6, 1) /'  '/ 
DATA  EVRESP(l,2)/r  ' /,  EVRESP (2, 2) /'GARR' /, 

.EVRESP(3,2)/'EVAP  RATE'/,  EVRESP (5,2) /' 1MON' /,  EVRESP ( 6, 2) /'  '/ 
DATA  EVRESP  (1, 3) /T  '/,  EVRESP  (2 , 3) /' OAHE' /, 

. EVRESP (3,3) / ' BVAP  RATE'/,  EVRESP ( 5, 3 ) /' 1MON' /,  EVRESP ( 6, 3) /'  '/ 
DATA  EVRESP  (1,4)  /r  ' /,  EVRESP  (2, 4) /' BEND' /, 

.EVRESP (3, 4) /'EVAP  RATE'/,  EVRESP (5, 4) /' 1MON' /,  EVRESP (6, 4) /'  '/ 
DATA  EVRESP  (1, 5)  /T  ' /,  EVRESP  (2, 5) /' FTRA' /, 

.EVRESP(3,5)/'EVAP  RATE'/,  EVRESP (5, 5) /' 1MON' /,  EVRESP (6, 5) /'  '/ 
DATA  EVRESP  (1. 6)  /T  '/,  EVRESP  ( 2 , 6) /' GAPT' /, 

.EVRESP (3, 6) /'EVAP  RATE'/,  EVRESP (5, 6) /' 1MON' /,  EVRESP ( 6, 6) /'  '/ 
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CHRUS 


SUBROUTINE  CHRLJS  (CIN.COUT) 
Lsft  justify  •  string 


PARAMETER  (KTEMP-132) 

CHARACTER*  (*)  CIN.COUT,  CTEMP*  (KTEMP) 

KIN— LEN (CIN) 

KOOT-LEH (COOT) 

CALL  LFLNB<CIN,1,KIN, IFR, ILEN) 
ILEN-MXN ( I LEN, KOUT , KTEMP ) 

C 

IF (XLEtf.LT.  1)  THEN 
CALL  CHRBLK(COUT) 

C 

ELSE 

CTEMF^IN 
ILAST-IFR+ILEH-1 
DO  10  1-1,  KOUT 
ICOL-IFR+I-1 
IP(ICOL.LE.KXN)  THEN 

COOT  ( I !  I  > -CTEMP  ( ICOL :  ICOL ) 

ELSE 

COOT(I:I)-'  ' 

BHD  IF 

10  CONTINUE 
EMDXF 

C 

RETURN 

END 
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RD  DODATA 


SUBROUTINE  RD  DODATA  O 


INTEGER  PREVYEAR,  I  YEAR,  JIDENT 
include  'rdataO.cbl' 


IX_YEAR«0 
PREV_YEAR— 9999 
BASEYR-'  ' 

Read  a  Record  of  time  series  data 


1500  READ (1,1505, END-5000)  CINREC 
1505  FORMAT  (A) 

CALL  CHRLNB  (CINREC,  NPRCOL) 

NPRCOL-MAX ( 1 , NPRCOL ) 

IF (CINREC (9: 10) .EQ.' 51' )  THEN 

WRITE(6,'("  51  RECORD : ' ' , /IX, A) ' )  CINREC (l:NPRCOL) 

ELSE 

IF (CINREC (77:80) .EQ. ' EVAP' )  THEN 

WRITE  (6, '  (' '  EVAP  RECORD:", /IX,  A)')  CINREC  (1 :  NPRCOL) 

ENDIF 

READ (CINREC (1: 10) , ' <I4,4X,I2)')  IYEAR, JIDENT 

IXLOC-O 
IULOC-1 

DO  WHILE  (IULOC.LE.NULOC) 

IF  ( JIDENT. EQ.  IDENT  ( IULOC)  )  THEN 
IXLOC-IULOC 
GO  TO  2000 
ENDIF 

IULOC-IULOC+1 
END  DO 

IF (JIDENT. £0. 1)  THEN 
IXLOC-NULOC+1 
ELSE 

WRITE (6, 1520)  JIDENT, IYEAR 

1520  FORMAT (/'  Identification  ',13,'  not  found!  (Year' , 15, ' ) ' ) 

30  TO  1500 
ENDIF 

IF(IYEAR.NE.PREV  YEAR)  THEN 
IF (IX_YEAR+1 .GT.KYEAR)  THEN 
CALL  WREVAP  () 

CALL  WRFLOW  () 

IXYEAR-l 
BASE_YR='  ' 

ELSE 

I  X_YEAR=  I  X_YEAR+ 1 
ENDIF 
ENDIF 

PREVYEAR- 1  YEAR 

IF (BASE_YR.EQ. '  ')  BASEYR-CINREC (1 :4) 
evaporation  (yearly) 


IF  (JIDENT .  EQ.  1 )  THEN 

READ (CINREC, 1600)  (EVRATE (J) , J-l, 6) 

FORMAT (10X, 6F10 . 0) 

JLOC-1 

DO  WHILE(JLOC.LE.6) 

VAL_YR ( IXYEAR, JLOC) -EVRATE ( JLOC) 

JLOC— JLOC+1 
END  DO 

Distribute  yearly  over  the  month 

JXLOC-1 

DO  WHILE  (JXLOC.LE.6) 

JMO— 1 

DO  WHILE  (JMO.LE.12) 

VALUES (JMO) -EVRATE ( JXLOC) »EVDIST (JMO) *0.01 
VAL_MON(  (IX  YEAR-1)  *12+JMO,  NULOC+JXLOC)  -EVRATE  (JXLOC)  * 
EVDIST (JMO) ^0 .01 
JMO-JMO+1 
END  DO 

JXLOC— JXLOC  + 1 
END  DO 


Inflow  or  Depletion 


ELSE 

JXYF.AR=(IX_YEAR-1)  *12 
READ (CINREC, 1700)  (VALUES (J) , J-l, 12) 
1700  FORMAT (15X, 12F5.0) 
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RD  DODATA 


JMO-1 

DO  WHILE (JMO.LE. 12) 

VAL_MON { JXYEAR+JMO, IXLOC) -VALDES (JMO) 
JMO-JMO+1 
END  DO 
ENDIF 
C 

ENDIF 

GO  TO  1500 
C 

5000  IF(IXJfEAR.GT.O)  THEN 
CALL  WR_EVAP  () 

CALL  WR_FLOW  () 

C 

IX_YEAR-0 

ENDIF 


RETORN 

END 
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RD  USRI 


SUBROUTINE  RD_U8RI  <) 

C 

include  'rdataO.cbl' 

C 

ID_DPL  ALT-'  ' 

NC  ID  EPL  ALT-0 
C 

1500  MRITE <«, 1505) 

1505  FORMAT (/'  Entar  yaar  of  depletions:  ') 

READ(5, 1510, ERR-9000, END-9000)  CINREC 
1510  FORMAT  (A) 

CALL  LFLNB{CXNR£C,  1, 80,  IFR,  XLEN) 

IF (XLEN.GT. 0)  THEN 

ID  DPL  ALT— CINREC (IFR: IFR+ILEN-1) 
caEl  cBrlnb (ID_DPL  ALT,NC_ID_DPL_ALT) 

ELSE  ~ 

ID  DPL  ALT-'  ' 

NC~ID _5PL_ALT-0 

endiF 

C 

C  Store  yaar  of  depletions  in  part  F  of  depletion  pathname 
C 

IXLOC— 1 

DO  NHILE(IXLOC.LE.XOLOC) 

IFdXLOC.OE.MX  LOC  DPL(l)  .AND.  IXLOC. LE. MX_LOC_DPL(2)  )  THEN 
CALL  CHRLJS  (TD_DFL_ALT, CP  («,  IXLOC)  ) 

ENDIF 

IXLOC-IXLOC+1 
END  DO 
C 

9000  RETURN 
END 
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WR  EVAP 


SUBRODTIME  MR_EVAP  () 

Store  evaporation  data  in  DSS  file 


LOGICAL  LFIRST 
include  'rdataO.cbl' 

DATA  LFIRST/. TRUE./ 


Setup  Pathname  Parte 


IF (LFIRST)  THEN 
LFIRST- . FALSE . 

JULOC-1 

DO  WHILE  (JUL0C.LE.6) 

JP-1 

DO  WHILE  (JP.LE.6) 

CALL  CHRLNB {EVRESP (JP, JULOC) .NVRESP ( JP, JULOC) ) 
JP-JP+1 
END  DO 

JULOC— JULOC  + 1 
END  DO 
ENDIF 

Store  KYEAR'e  data 


JXLOC- 1 

DO  WHILE  (JXLOC. LE. 6) 

CALL  2FPN  (EVRESP  (1,  JXLOC),  NVRESP  (1,  JXLOC)  ,  EVRESP  (2,  JXLOC), 

.  NVRESP  (2,  JXLOC)  .EVRESP  (3,  JXLOC) , NVRESP  (3 ,  JXLOC) , EVRESP  ( 4 ,  JXLOC)  , 
NVRESP  (4.  JXLOC)  .EVRESP  (5,  JXLOC)  ,  NVRESP  (5,  JXLOC)  ,  EVRESP  (6,  JXLOC)  , 
.  NVRESP  (6,  JXLOC),  CP  ATH.NPATH) 


CDATE-' 31MAR' //BASEYR 
CTIME-' 2400' 
NVALS«IX_YEAR*12 
CUNITS— '  FT  ' 

CTYPE— ' PER— CUM  ' 
IPLAN-0 


CALL  ZSRTS  ( IFLTAB,  CPATH,  CDATE,  CTIME,  NVALS , 
VAL_MON ( 1 , NULOC+ JXLOC) .CUNITS, CTTPE, IPLAN, ISTAT) 


Yearly  interval  evaporation 


NVALS— IX  YEAR 
CDATE—'  3TDEC'  //BASE  YR 
CUNITS-' FT/YR  ' 

IPLAN-0 

CALL  ZFPN (EVRESP  (1,  JXLOC)  , NVRESP  (1,  JXLOC)  ,  EVRESP  (2,  JXLOC)  , 

.  NVRESP  (2,  JXLOC)  .EVRESP  (3,  JXLOC),  NVRESP  (3,  JXLOC)  .EVRESP  (4,  JXLOC)  , 
.  NVRESP  (  4  ,  JXLOC  )  ,  '  1  YEAR'  ,  5  ,  EVRESP  (6,  JXLOC )  , 

NVRESP  (  6,  JXLOC  ),  CPATH,  NPATH) 

CALL  ZSRTS  (IFLTAB.CPATH.CDATE, CTIME,  NVALS,  VAL_YR(1,  JXLOC)  , 

.  CUNITS, CTYPE,  IPLAN,  ISTAT) 

JXLOC-JXLOC+1 
END  DO 

RETURN 

END 
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SUBROUTINE  WRFLON  () 

C 

C  Writ*  Inflows  and  Depletions  to  DSS  file 

C  - 

include  ' rdataO . cbl ' 

C  - 

c 

IXLOC-l 

DO  WHILE < IXLOC. LE.NULOC) 

CALL  ZFPN (CP (1, IXLOC) , NP (1, IXLOC) ,CP <2, IXLOC) ,NP (2, IXLOC) , 

.  CP (3, IXLOC), NP (3, IXLOC),'  ' , 0, CP (5, IXLOC) ,NP (5, IXLOC) , 

.  CP (6, IXLOC) , NP (6, IXLOC) , CPATH, NPATH) 

C 

CDATE-' 31MAR' / /BASE_YR 
CTIHE-'2400' 

NVALS-12*  IX_YEAR 
CONITS-'KAF  ' 

CTYPE-' PER- AVER' 

IPLAN-0 

C 

CALL  ZSRTS  ( IFLTAB,  CPATH,  CDATE,  CTIME,  NVALS  ,  VAL_MON  (1,  IXLOC)  , 
.  CONITS, CTYPE, IPLAN, ISTAT) 

C 

IXLOC-IXLOC+1 
END  DO 
C 

RETORN 

END 
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Common  Blocks  for  RDATAO 


PARAMETER (EOXOC-30,  KTSAR-125) 

C 

CHARACTER  CP  <6,  KULOC)  *32,CFNAME*64,CFNDSS*«4,  CINREC*132, 

.  CPATB*80,CDATE*9,CTIMB*4,CUNITS*8,CTTPE*8,EVRBSP  (6,  «)  *32, 

I D_DP L_ALT *10,  BASE  TR*4 
C 

C0M40M  /CAA/  CP,  CFHAME,  CFND8S,CINRBC, CPATH, CDATE, CTIME, CUMITS, 

.  CTYPE,EVRE3P,ID  DPL  ALT,  BASE  YR 
C  ~  - 

INTEGER  NOLOC,  IDENT (KULOC)  ,NP  (6.KOLOC)  ,  IFLTAB  (1200)  ,NVRESP  (6,  €) , 
.  MC_ID  DPL  ALT,  NX  LOC  DPL  (2),  IX  TEAR 
REAL  VA£DEST12),EVRXTE('S),EVDIST(17),TR_EVRATE(S), 

.  VAL_NON(12*KYEAR, KDLOC) ,  VAL_YR (KTEAR, KULOC ) 

C 

COMMON  /AA/  NOLOC,  I  DENT,  HP,  IFLTAB,  VALUES, EVRATE,EVDIST,NVRESP, 
NC_ID  DPL_ALT,  NX_LOC_DPL,  TR_EVRATE,  VAL_NON,  VAL_TR, 

IX  yeXr 
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RDMATF 


Purpose  of  RDMATF 

RDMATF  reads  the  output  file  created  by  MRD’s  postprocessing  program 
"VI. EXE"  and  stores  the  output  data  in  an  HECDSS  data  file.  Any  monthly 
regular  interval  time  series  data  may  be  read  by  RDMATF  as  long  as  the  data 
is  stored  in  columns;  e.g.  All  Ft  Peck  release  is  in  column  1,  all  Garrison 
release  is  in  column  2  ....etc.  and  there  is  one  month  per  line.  The  data  is 
read  free-format  so  that  they  need  not  be  written  in  fixed  locations. 

Copying  the  Program  onto  Your  Hard  Disk 

Use  the  "pkunzip.exe"  utility  to  retrieve  and  uncompress  the  program  from 
diskette.  If  "pkunzip.exe"  does  not  already  exist  on  your  system,  copy  it  from 
the  diskette  onto  your  fixed  disk  drive  (hard  disk).  Normally,  it  would  be 
copied  into  the  "C:\HECEXE"  subdirectory  and  the  "path"  command  in  your 
"C:\AUTOEXEC.BAT"  file  would  contain  a  reference  to  this  subdirectory. 

To  retrieve  the  program  from  diskette  in  drive  "a:"  and  stare  it  on  your  fixed 
disk  drive  in  subdirectory  "c:'frecexe",  enter  the  following  command: 

pkunzip  a: rdmatf  c:\hecexe 

Copying  Example  Data  onto  Your  Hard  Disk 

To  copy  the  example  input  data  file  "RC9881.TXT"  onto  your  fixed  disk 
drive  (hard  disk),  follow  the  preceding  instructions  for  copying  the  program 
"RDMATF.EXE"  but  substitute  ”rc988r'  in  place  of  "rdmatf'. 

Preparing  the  Input  data  file. 

Output  from  the  "VT.EXE"  program  (or  any  other  similar  file)  need  not  be 
modified  before  it  is  read  by  "RDMATF.EXE".  However,  RDMATF  requires 
that  the  first  2  lines  of  the  file  contain  data  normally  written  to  the  "dmatfile" 
by  "vl.exe".  The  first  line  contains  three  parameters  in  the  following  order: 
(1)  the  simulation  identification  (e.g.  "D0411212")  which  is  used  for  part  F  of 
the  DSS  pathname,  (2)  the  starting  year  of  simulation  (assumed  to  start  in 
March),  and  (3)  the  ending  year  of  simulation  (assumed  to  end  in  February). 
The  second  line  contains  codes  identifying  the  type  and  location  of  data 
written  to  the  "dmatfile”.  There  is  one  code  for  each  column  of  data.  The 
code  consorts  of  *wo  parts:  (a)  the  parameter  identifier  which  is  one  character, 
and  (b)  the  location  identifier  which  is  an  integer  from  1  to  13  (e.g.  Fort  Peck 
is  location  1).  RDMATF  automatically  determines  all  pathname  pans  as 
described  in  the  document  "HEC-PRM  Pathname  Parts”,  dated  December 
1991. 
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Example  Input  Data  File 


The  following  is  the  example  data  file  (RC9881.TXT)  included  with  the 
program: 

D0411212  1898  1980 


G1  G2 

G3  G5  G6  MS  N9  N10  Nil 

N12  N13 

290.0 

820.0 

895.0  808.0  894.0  1024.0  1052.0  1124.0  1435.0  2051.0  3363.0 

494.0 

1464.0 

2088.0 

2177.0 

2290.0 

2410.0 

2397.0 

2396.0 

2443.0 

2911.0 

3911.0 

563.0 

1542.0 

1335.0 

1526.0 

1638.0 

2090.0 

2225.0 

2492.0 

3304.0 

4747.0 

7740.0 

632.0 

1707.0 

1498.0 

1541.0 

1653.0 

1873.0 

2044.0 

2440.0 

3365.0 

3692.0 

4557.0 

880.0 

2336.0 

1990.0 

2140.0 

2199.0 

2294.0 

2319.0 

2430.0 

2632.0 

2867.0 

3548.0 

721.0 

1954.0 

2354.0 

2346.0 

2397.0 

2468.0 

2519.0 

2770.0 

3105.0 

3385.0 

4162.0 

620.0 

1693.0 

2454.0 

2455.0 

2510.0 

2569.0 

2628.0 

2879.0 

3404.0 

3779.0 

4847.0 

543.0 

1649.0 

1838.0 

2418.0 

2493.0 

2513.0 

2579.0 

2784.0 

3270.0 

3666.0 

4416.0 

663.0 

1678.0 

1601.0 

2317.0 

2396.0 

2412.0 

2458.0 

2588.0 

2953.0 

3219.0 

3748.0 

683.0 

1382.0 

2048.0 

1373.0 

1450.0 

1458.0 

1572.0 

1809.0 

2408.0 

2761.0 

3421.0 

794.0 

1587.0 

1439.0 

1106.0 

1182.0 

1184.0 

1275.0 

1532.0 

2147.0 

2328.0 

2695.0 

677.0 

1534.0 

1080.0 

1008.0 

1103.0 

1137.0 

1166.0 

1221.0 

1514.0 

1596.0 

1797.0 

498.0 

1310.0 

1086.0 

1400.0 

1526.0 

1697.0 

1663.0 

1682.0 

1850.0 

2428.0 

3755.0 

605.0 

1723.0 

1797.0 

1911.0 

2020.0 

2148.0 

2195.0 

2290.0 

2664.0 

2843.0 

3180.0 

605.0 

1919.0 

1399.0 

1490.0 

1597.0 

1952.0 

2249.0 

3115.0 

5119.0 

5781.0 

7134.0 

178.0 

2003.0 

1588.0 

1724.0 

1832.0 

2100.0 

2423.0 

3481.0 

5642.0 

5916.0 

6701.0 

706.0 

3258.0 

2959.0 

2897.0 

2954.0 

3019.0 

3298.0 

4424.0 

6515.0 

6650.0 

7180.0 

922.0 

2336.0 

3291.0 

3381.0 

3430.0 

3482.0 

3661.0 

4403.0 

5739.0 

5808.0 

6168.0 

891.0 

2107.0 

3250.0 

3285.0 

3338.0 

3376.0 

3434.0 

3657.0 

4134.0 

4392.0 

5194.0 

833.0 

2003.0 

2643.0 

3228.0 

3301.0 

3394.0 

3431.0 

3541.0 

3844.0 

4045.0 

4385.0 

892.0 

2054.0 

2850.0 

3532.0 

3604.0 

3680.0 

3709.0 

3806.0 

4099.0 

4225.0 

4478.0 

755.0 

1399.0 

2209.0 

1494.0 

1569.0 

1619.0 

1777.0 

2028.0 

2685.0 

2935.0 

3284.0 

849.0 

1613.0 

1500.0 

1106.0 

1186.0 

1208.0 

1287.0 

1485.0 

1989.0 

2114.0 

2350.0 

726.0 

1587.0 

1082.0 

1008.0 

1109.0 

1257.0 

1263.0 

1278.0 

1444.0 

1490.0 

1619.0 

351.0 

991.0 

1162.0 

1151.0 

1286.0 

1839.0 

1875.0 

2030.0 

2636.0 

3358.0 

4967.0 

351.0 

1176.0 

1463.0 

1623.0 

1740.0 

2090.0 

2165.0 

2332.0 

2939.0 

3084.0 

3367.0 

418.0 

1243.0 

1889.0 

1900.0 

2014.0 

2073.0 

2177.0 

2401.0 

3073.0 

3193.0 

3428.0 

553.0 

1429.0 

1730.0 

1832.0 

1946.0 

2019.0 

2110.0 

2314.0 

2754.0 

2810.0 

3057.0 

586.0 

1571.0 

1501.0 

1674.0 

1736.0 

2023.0 

2142.0 

2471.0 

3115.0 

3205.0 

3560.0 

554.0 

1429.0 

1691.0 

1694.0 

1747.0 

1938.0 

2053.0 

2495.0 

3266.0 

3328.0 

3638.0 

462.0 

1175.0 

1643.0 

1672.0 

1729.0 

1879.0 

1992.0 

2401.0 

3237.0 

3294.0 

3688.0 

378.0 

1069.0 

1096.0 

1858.0 

1936.0 

2009.0 

2100.0 

2425.0 

3138.0 

3474.0 

4087.0 

276.0 

800.0 

1127.0 

1636.0 

1718.0 

1783.0 

1920.0 

2304.0 

3174.0 

3528.0 

4207.0 

721.0 

1468.0 

1635.0 

922.0 

1001.0 

1043.0 

1125.0 

1323.0 

1831.0 

2121.0 

2697.0 

{additional  data  deleted} 

758.0 

1273.0 

1695.0 

2313.0 

2431.0 

2762.0 

3155.0 

3415.0 

4136.0 

4199.0 

4399.0 

695.0 

1395.0 

1978.0 

1358.0 

1512.0 

1757.0 

2023.0 

2316.0 

2893.0 

2918.0 

3389.0 

812.0 

1605.0 

1500.0 

1106.0 

1204.0 

1335.0 

1563.0 

1716.0 

2142.0 

2178.0 

2492.0 

834.0 

1595.0 

1004.0 

1008.0 

1163.0 

1321.0 

1472.0 

1723.0 

2061.0 

2171.0 

2769.0 

396.0 

1067.0 

1364.0 

1243.0 

1425.0 

1630.0 

1754.0 

2273.0 

3177.0 

3293.0 

4397.0 

445.0 

1309.0 

1457.0 

1493.0 

1697.0 

1866.0 

2018.0 

2566.0 

4875.0 

5649.0 

7146.0 

529.0 

1379.0 

1597.0 

1610.0 

1775.0 

1925.0 

2038.0 

2594.0 

2949.0 

3088.0 

3359.0 

608.0 

1490.0 

1556.0 

1563.0 

1702.0 

1865.0 

2139.0 

2855.0 

3924.0 

4169.0 

4745.0 

792.0 

1602.0 

2359.0 

2266.0 

2298.0 

2387.0 

2374.0 

2415.0 

2554.0 

2601.0 

2893.0 

865.0 

1538.0 

2152.0 

2170.0 

2242.0 

2383.0 

2415.0 

2467.0 

2627.0 

2908.0 

2987.0 

826.0 

1313.0 

2209.0 

2147.0 

2196.0 

2314.0 

2357.0 

2364.0 

2537.0 

2865.0 

2969.0 

730.0 

1274.0 

1442.0 

2210.0 

2257.0 

2405.0 

2479.0 

2540.0 

2611.0 

2674.0 

2702.0 

538.0 

966.0 

1460.0 

1920.0 

1993.0 

2177.0 

2226.0 

2359.0 

2446.0 

2627.0 

2697.0 

780.0 

1538.0 

1524.0 

816.0 

916.0  1041.0  1124.0  1266.0  1638.0  2199.0  2414.0 

942.0 

1745.0 

1126.0 

816.0 

932.0  1029.0  1055.0  1224.0  1416.0  1379.0  1489.0 

884.0 

1722.0 

836.0 

744.0  856.0  921.0  989 

.0  1124 

.0  1287.0  1347.0  1549.0 
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Executing  the  program. 


To  execute  the  program,  you  must  define  the  input  data  file  and  the  output 
HECDSS  data  file  on  the  execution  line.  The  "MENUPRM"  program  will 
assist  you  in  defining  these  files.  It  assumes  that  all  "dmatfile'  s  have  the 
extension  ".mat".  To  execute  the  program  from  the  DOS  prompt,  the  program 
name  and  file  assignments  must  be  entered.  For  example,  to  use  the  above 
example  file  named  "RC9881.TXT"  and  store  it  an  HECDSS  data  file  named 
"EXAMPLE.DSS",  enter  the  following  command  at  the  DOS  prompt: 


RDMATF  I-RC9881.TXT  DSS— EXAMPLE 


HEC-PRM  Supplemental  Programs  (RDMATF) 


H  -  209 


December  1991 


Example  Output  Data  File 


- DSS— ZOPEN:  Existing  Pile  Opened,  File:  RDMATF.DSS 

Unit :  71 1  DSS  Version:  6-GO 


- DSS- 

— Z WRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

— Z WRITE 

Unit 

71/ 

Vera. 

1: 

- DSS- 

— ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

— ZWRITE 

Unit 

71/ 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera . 

1; 

- DSS- 

--ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

— ZWRITE 

Unit 

71; 

Vera . 

1; 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera . 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera . 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vers. 

1: 

- DSS- 

— ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera . 

1; 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

— ZWRITE 

Unit 

71; 

Vers. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1 : 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

— ZWRITE 

Unit 

71; 

Vere. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vers. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vers. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

I: 

- DSS- 

— ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

"■"ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera . 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vers. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vers. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

— ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

— ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

--ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vers. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

--ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vers. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera . 

1: 

- DSS- 

— ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

— ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

— 2 WRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

— ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

--ZWRITE 

Unit 

71; 

Vera . 

1 : 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vera . 

1 : 

- DSS- 

--ZWRITE 

Unit 

71; 

Vera. 

1: 

- DSS- 

--ZWRITE 

Unit 

71; 

Vera . 

1 : 

- DSS- 

— ZWRITE 

Unit 

71; 

Vera . 

1: 

- DSS- 

--ZWRITE 

Unit 

71; 

Vers. 

1 : 

- DSS- 

--ZWRITE 

Unit 

71; 

Vera. 

1 : 

- DSS- 

—  ZWRITE 

Unit 

71; 

Vers . 

1: 

- DSS- 

— ZWRITE 

Unit 

71; 

Vers . 

1 : 

- DSS- 

--ZWRITE 

Unit 

71; 

Vers  . 

1 : 

- DSS- 

--ZWRITE 

Un  i  t 

71/ 

Ver s  . 

1  : 

- DSS- 

-- ZWRITE 

Unit 

71; 

Ver  s  . 

1  : 

- - 

--ZWRITE 

Un  i  r 

71; 

Very. 

1  : 

- i  :  .  - 

—  ZWRITE 

Ur.it 

71; 

Vers . 

1  : 

//FTPK-GARK/FLOM/01JAN1890/1MON/D0411212/ 
//FTPK-GARR/FLOW/01JAN1900/1MON/D0411212/ 
/ /FTPK-GARR/ FLOW/ 01 JANl 910/ 1MON/D04 1 1212/ 
/ /FTPK-GAHH/ FLOW/01 JANl 920/ 1MON/D04 1 121 2/ 
//FTPK-GARR/FLOW/01JAN1  930/  1MON/D04 11212/ 
//FTPK-GARR/FLOW/01JAN1 940/ 1MON/D04 11212/ 
/ /FTPK-GARR/ FLOW/ 01 JANl 950/ 1MON/D04 1 1212/ 
//FTPK-GARR/FLOW/01JAN1 960/ 1MON/D04 11212/ 
//FTPK-GARR/FLOW/01  JANl  970/ 1 MON/D0  4 1 1212/ 
/ /FTPK-GARR/FLOW/01 JANl 980/ 1MON/D04 1 1212 / 
/ /GARR-OAHE/FLOW/Ol  JANl  890/  1MON/D04 1 1212/ 
//GARR-OAHE/FLOW/Ol JANl 900/ 1MON/D04 11212/ 
/ /GARR-OAHE/FLOW/Ol JANl 910/ 1MON/D041 1212/ 
//GARR-OAHE/FLOW/Ol JANl 920/ 1MON/D04 11212/ 
//GARR-OAHE/FLOW/OIJANI 930/ 1MON/D04 11212/ 
//GARR-OAHE/FLOW/01JAN1940/1MON/D04U212/ 
//GARR-OAHE/FLOW/OIJANI  950/  1MON/D041 1212/ 
/ / GARR-OAHE / FLOW/ 0 1 JAN 1 9 6 0 / 1 MON / D 0 4 1 1 2 1 2 / 
/ /GARR-OAHE/FLOW/O 1 JANl 970/ 1MON/D0 4 1 1 2 1 2 / 
//GARR-OAHE/FLOW/OIJANI  980/  1MON/D041 1 212/ 
/ /OAHE-BEND/FLOW/Ol JANl 890/ 1MON/D04 1 1212/ 
/ /OAHE-BEND /FLQW/01 JANl 900/ 1MON/D041 1212/ 
/ /OAHE-BEND /FLOW/ 01 JANl 910/ 1MON/D04 1 1212/ 
/ /QAHE-BEND/FLOW/01 JANl 920/1MON/D04 1 1212/ 
//OAHE-BEND/FLOW/01 JANl 930/1MON/D04 1 1212/ 
//OAHE-BEND /FLOW/ 01 JANl 940/1MON/D04 1 1212/ 
//OAHE-BEND/ FLOW/ 01 JANl 950/1MON/D041 1212/ 
/ /OAHE-BEND/ FI/7W/ 01  JANl  960/1MON/D041 1212/ 
/ /OAHE-BEND/ FLOW/ 01 JANl 970/ 1MON/D04 11212/ 
/ /OAHE-BEND /FLOW/ 01 JANl 980/ 1MON/D041 1212/ 
/ /FTRA-GAPT/FLOW/01 JAN1890/1MON/D0411212/ 
//FTRA-GAPT/FLOW/01JAN1900/1MON/D0411212/ 
//FTRA-GAPT/FLOW/01 JANl 910/ 1MON/D041 1212/ 
//FTRA-GAPT/FLOW/01 JANl 920/ 1MON/D041 1212/ 
//FTRA-GAPT/FLOW/01JAN1930/1MON/D0411212/ 
//FTRA-GAPT/FLOW/01 JANl 940/ 1MON/D041 1212/ 
//FTRA-GAPT/FLOW/01 JANl 950/ 1MON/D04 11212/ 
/ /FTRA-GAPT/FLOW/01 JANl 960/ 1MON/D04 11212/ 
//FTRA-GAPT/FLOW/01 JANl 970/ 1MON/D04 11212/ 
//FTRA-GAPT/FLOW/01 JANl 980/ 1MON/D04 11 212/ 
/ /GAPT-SUX/FLOW/01 JANl 8  90 / 1 MON/ DO 4 11212/ 
//GAPT—SUX /FLOW/ 01 JANl 900 / 1MON/D04 11212/ 

/ /GAPT-SUX/FLOW/01 JANl 910 / 1 MON /DO 4 1 1212/ 
//GAPT-SUX/FLOW/01 JANl 920 /1MON/D04 11 212/ 
//GAPT-SUX/FLOW/01 JANl 930 /1MON/D04 112 12/ 
//GAPT-SUX/FLOW/01 JANl 940/ 1MON/D04 11 212/ 
//GAPT-SUX/FLOW/01 JANl 950/ 1MON/D04 11212/ 

/ /GAPT-SUX/FLOW/01 JANl 960 /1MON/ DO 41 1212/ 

/ /GAPT-SUX/FLOW/01 JANl 970/ 1MON/ DO 41 1212/ 
//GAPT-SUX/FLOW/OIJANI 980/ 1MON/D041 1212/ 

/ /SUX-OMA/FLOW/Ol JANl 890/ 1MON/D041 1212/ 

/ / SUX-OMA/FLOW/Ol  JANl  900/  1MON/D04 1 12 12/ 
//SUX-OMA/FLOW/Ol JANl 91 0/1MON/D04 11212/ 

/ / SUX-OMA/FLOW/Ol JANl 920/ 1MON/D04 1 1212/ 
//SUX-OMA/FLOW/Ol JANl 930/ 1MON/D04 11212/ 
//SUX-OMA/FLOW/Ol JANl 940/ 1MON/D04 11212/ 
//SUX-OMA/FLOW/Ol JANl 950/ 1MON/D04 11212/ 
//SUX-OMA/FLOW/Ol JANl 960/ 1MON/D04 11212/ 
//SUX-OMA/FLOW/Ol JANl 970/ 1MON/D04 11212/ 
//SUX-OMA/FLOW/Ol JANl 980/ 1MON/D04 11212/ 

/ /OMA-NCNE/FLOW/Ol JAN1890/1MON/D0411212/ 
//OMA-NCNE/FLOW/01JAN1 900/ 1MON/D04 11212/ 
//OMA-NCNE/FLOW/01 JANl 91 0/1MON/D04 11212/ 
//OMA-NCNE/FLOW/Ol JANl 920/ 1MON/D041 1212/ 
//OMA-NCNE/FLOW/Ol JANl 930/ 1MON/D04 11212/ 
//OMA-NCNE/FLOW/Ol JANl 940/ 1MON/D04 11 212/ 
//OMA-NCNE/FLOW/Ol  JANl  950 /1MON/D04  1121 2/ 
//OMA-NCNE/FLOW/Ol  JANl  960/ 1MON/D04 1121 2/ 
//OMA-NCNE/FLOW/Ol JANl 970/ 1MON/D04 112 12/ 
//OMA-NCNE/FLOW/Ol JANl 980/ 1MON/D04 112 12/ 

/ /NCNE-MKC/FLOW/01 JANl 890/1  MON /DO 4 11212/ 

/ /NCNE-MKC/FLOW/Ol JANl 900/ 1MON/D041 1212/ 
//NCNE-MKC/FLOW/01 JANl 91 0/1MON/D04 112 12/ 
//NCNE-MKC/FLOW/01 JANl 920/ 1MON/D04 11212/ 

/ /NCNE-MKC/FLOW/01 JANl 930 /1MON/D04 11 21 2/ 

/ /NCNE-MKC/FLOW/0 1 JANl 940 / 1MON/D04 11212/ 

/ , NCNE-MKC/FLOW/01 JANl 950/ 1MON/D041 1212/ 
//NCNE-MKC/FLOW/01 JANl 960/ 1MON/D04 11 212/ 

/ /NCNE-MKC/FLOW/ni JANl 970/ 1MON/D041 1212/ 
//NCNE-MKC/FLOW/01 JANl 980/1MON/D04 1121  2/ 
//MKC-BNMO/FLOW/Ol JAN1H90/ 1MCN/D041 1212/ 

//MKC-BNMO/FLOK/'U  . . 1M  H/P041 1212/ 

/  /MKC-BNMO/FLOW  f  O  1  JANl  9  1  ri  '  1  MON  /  D04  1  1  2  1 2  / 

/  MKC-BNM."/FI,OW  ■  "  1  :,V:  K-  N  /  U0  : 1  1  2  1  2  / 

//MKC-BNMO/FI.-W  >1  '  •  <  1M-  N  T.m4  1 1 212/ 
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— 

- DSS-- 

-Z WRITE 

Unit 

71; 

Vers . 

1 

//MKC-BNMO/FLOW/Ol JAN1 940/ 1MON/D04 11212/ 

— 

- DSS — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

//MXC-BNMO/FLOW/OIJANI 950/ 1MON/D041 1212/ 

— 

- DSS— 

-ZWRITE 

Unit 

71; 

Vers. 

1 

//MKC-BNMO/FLOW/Ol JAN1 960/ 1MON/D04 11 21 2/ 

-- 

- DSS— 

-ZWRITE 

Unit 

71; 

Vers . 

1 

//MKC-BNMO/FLOW/Ol JAN1 970/ 1MON/D041 1212/ 

— 

- DSS — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

//MKC-BNMO/FLOW/01JAN1980/1MON/D0411212/ 

-- 

- DSS  — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /BNMO-HEMO/FLOW/Ol JAN1890/1MON/D041 12 12/ 

— 

- DSS  — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /BNMO— HEMO/FLOW/Ol JAN1 900/ 1MON/D0411 2 12/ 

— 

- DSS  — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /BNMO-HEMO/FLOW/Ol JAN1 91 0/1MON/D041 1212/ 

— 

- DSS  — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

//BNMO-HEMO/FLOW/Ol JAN1 920/ 1MON/D04 11212/ 

— 

- DSS  — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /BNMO-HEMO/FLOW/Ol JAN1930/1MON/D0411212/ 

— 

- DSS — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

//BNMO-HEMO/FLOW/Ol JAN 1 940/1MON/D0411212 / 

— 

- DSS— 

-ZWRITE 

Unit 

71; 

Vers . 

1 

//BNMO-HEMO/FLOW/01JAN1950/1MON/D04 11212/ 

— 

- DSS— 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /BNMO-HEMO/FLOW/Ol JAN1  960/1MON/D04U212/ 

— 

- DSS — 

-ZWRITE 

Unit 

71; 

Vers  . 

1 

//BNMO- HEMO/FLOW/Ol JAN1970/1MON/D0411212/ 

— 

- DSS — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /BNMO— HEMO/FLOW/01 JAN1 980/ 1MON/D041 1212/ 

— 

- DSS — 

-ZWRITE 

Unit 

71; 

Ver  s . 

1 

/ /HEMO-STL/FLOW/01 JAN1890/1MON/D0411212/ 

— 

- DSS — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /HEMO-STL/FLOW/ 01 JAN1 900/ 1MON/D04 11212/ 

— 

- DSS — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /HEMO-STL/FLOW/01  JAN1  910/ 1MON/D0411212/ 

— 

- DSS— 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /HEMO-STL/FLOW/01 JAN1 920/ 1MON/D04 11212/ 

— 

- DSS — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /HEMO-STL/FLOW/01 JAN 1930/ 1MON/D04 11212/ 

— 

- DSS— 

-ZWRITE 

Unit 

71; 

Vers . 

1 

//HEMO-STL/FLOW/01 JAN1 940/ 1MON/D04 11212/ 

— 

- DSS — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /HEMO-STL/FLOW/01 JAN1950/1MON/D0411212/ 

— 

- DSS — 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /HEMO-STL/FLOW/01 JAN1960/1MON/D0411212/ 

— 

- DSS— 

-ZWRITE 

Unit 

71; 

Vers . 

1 

//HEMO-STL/FLOW/01 JAN1 970/ 1MON/D04 112 12/ 

— 

- DSS— 

-ZWRITE 

Unit 

71; 

Vers . 

1 

/ /HEMO-STL/FLOW/ 01 JAN1 980/ 1MON/D0411212/ 

- DSS - ZCLOSE  Unit: 

71, 

File 

RDMATF . DSS 

Pointer  Utili 

zat ion 

0.3°  1 

Number  of 

Records : 

200  1 

File  Size 

227.1 

Kbyte,  I 

Percent  Inactive:  0.0 
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Listing  of  Computer  Source  Code  for  RDMATF 


PROGRAM  RDMATF 
C 

C  Read  MRD  DMATFILE  and  store  results  in  DSS  data  file 

C  - 

PARAMETER  (KVAR-30, KSDATA-20000) 

INTEGER* 4  JULWIN(2) , INTRVL 
C  INTEGER  JULWIN (2) , INTRVL 

INTEGER  YRNIN  (2)  ,  MONWIN  (2)  ,  DAYWIN  (2)  ,MINWIN  (2)  ,  NPATH  (KVAR)  , 
.IFLTAB(1200) ,  NPNPRT<6),  I X_P ARAM (KVAR) ,  IX_LOC (KVAR) 

C 

CHARACTER  CFNIO* 64 , CFNDSS *  64 , CP ATH ( KVAR) *80, 

.CNTRVL*9,DATWIN(2)*9,HOUWIN(2) *4 , CUNITS*8, CTYPE*8, CPNPRT (6) *32, 
.  DSR  VAR  (KVAR)  *4 
C 

REAL  TSDATA  (KSDATA) 

C 

include  'io.cbl' 
include  ' param. cbl' 

C - 

c 

CALL  ATTACH (S,' INPUT', 'STDIN','  CFNIO, IOEROl) 

CALL  ATTACH(6,  'OUTPUT'  ,'STDOUT'  ,'  ', CFNIO,  IOER02) 

CALL  ATTACH(21, 'DMATFILE' , 'DMATFILE. MAT' ,  '  ', CFNIO, IOER03 ) 

CALL  ATTACH (71, ' DSS_FILE' , ' SCRATCH31' , ' NOP' , CFNDSS, IOERDS) 

CALL  ATTEND 
C 

CDELM-'  ,/' 

CALL  SETDLM  ( 1 ,  CDEIM,  1,2,  ITBL) 

CALL  SETDIM(2,CDELM, 1,-1, ITBL) 

CALL  SETDLM(3,CDELM, 1,-1, ITBL) 

C 

NVAR-0 

MINWIN  ( 1 )  — 1 4  4  0 
MINWIN(2>-1440 
CPNPRT (4)-'  ' 

C 

1500  JREC-1 

DO  WHILE ( JREC .LE . 2) 

READ (21, 1505, END-9000)  CINREC 

CAPINP-CINREC 

CALL  UPCASE (CAP INP ) 

1505  FORMAT  (A) 

C 

CALL  FIND IH  (CINREC, 1, KINREC , NFL, IBF, LNF, IDT, IDP, ITBL) 

C 


C 


C 


C 


c 

c 


IF(JREC.EQ.l)  THEN 
JFL— 1 

DO  WHILE (JFL.LE. NFL) 

IF ( JFL.EQ. 1 )  THEN 

CPNPRT (6) -CINREC ( IBF ( JFL) : IBF (JFL) +LNF (JFL) -1) 

CALL  CHRLNB (CPNPRT (6)  , NPNPRT ( 6)  ) 

ELSE  TF (JFL.EQ. 2)  THEN 
MONWIN (1) =3 
DAYWIN ( 1 ) *3 1 

ITP-INTGR (CINREC, IBF (JFL) , LNF (JFL) , IER01) 
IF(IEROi.EQ.O)  THEN 
YRWIN(1)«ITP 
ELSE 

YRWIN  (1)  *=1898 
ENDIF 

ELSE  IF (JFL.EQ .3)  THEN 
MONWIN (2) *2 
DAYWIN  (2 )  =»2 8 

ITP-INTGR (CINREC, IBF (JFL) , LNF (JFL) , IER01) 

IF (IBR01 . EQ. 0)  THEN 
YRWIN (2) — ITP 
ELSE 

YRWIN (2) -1990 
ENDIF 

IF (MOD (YRWIN (2) ,4) .EQ. 0  .AND.  MOD ( YRWIN (2) , 100) .NE . 0 
-AND.  MOD ( YRWI N(2) ,400) .NE.O)  DAYWIN(2)»29 

ENDIF 
JFL—JFL+1 
END  DO 

ELSE  IF (JREC . EQ . 2 )  THEN 
JFL— 1 

DO  WHILE  (JFL.LE. NFL) 

IF(LNF(JFL) .LT.l)  THEN 
ELSE 

NVAR-NVAP.+  l 

USR_VAR I NVAR ) =CAP I NP ( I BF ( JFL) : I BF ( JFL) +LNF ( JFL) -1 ) 

IX_PAP-AM  ( l.’VAF  )  =  I  CHAP,  ( USP._VAP,  (NVAR)  ( 1 : 1 )  )  -  64 

CALL  CHRRJS (CAP INP (IBF (JFL) +1 : IBF (JFL) +LNF(JFL)-1) , 
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.  CTEMP (1:5)) 

READ  (C TEMP, ' (15) ' )  IX_LOC<NVAR) 

EHDIF 
JFL-JFL+1 
END  DO 
EHDIF 

jkEC^J kec + X 

END  DO 

C 

J-l 

DO  WHILE ( J.LE.2) 

JULWIN  ( J)  —  IYMDJL  (YRWIN  ( J)  ,  MONWIN  (J)  ,  DAYWIN  (J)  ) 
J-J+l 
END  DO 

Determine  the  number  of  time  periods 


IFLAG1-1 

CALL  ZGINTL  (INTRVL,  '  1MON'  ,  NTEMP,  IFLAG1) 

IFLAG2-0 

NPBR-l+NOPERS (INTRVL,  IFLAG2,  JULWIN  (1)  ,MINWIN  (1)  ,  JULWIN  (2)  , 
. MINWIN (2) ) 


J-l 

DO  WHILE  (J.LE.2) 

DATWIN  ( J)  — '  ' 

HOUWIN  ( J)  — '  ' 

CALL  JULDAT  ( JULWIN  (J)  ,  104,  DATWIN  (J)  ,  NTEMP ) 
ITP-M2IHM  (MINWIN  (J)  ,  HOUWIN  (J)  ) 

J-J+l 
END  DO 

CNTRVL-'  1MON' 


J-l 

DO  WHILE  (J.LE.NPER*NVAR) 
TSDATA(J)  —  901.0E+30 
J-J+l 
END  DO 


Read  data 


IORD-1 

DO  WHILE (IORD.LE.NPER) 

READ(21, ' (A) ', END-3500)  CINREC 

CALL  FINDLM  (CINREC, 1 , KINREC, NFL, IBF, LNF, IDT, IDP,  ITBL) 
JFL-1 

DO  WHILE (JFL.LE. NFL) 

JTP-(JFL-l) *NPER+IORD 

TEMP— XREAL (CINREC, IBF ( JFL) , LNF  < JFL) , IER02) 

IF (IER02 . EQ. 0)  TSDATA ( JTP ) —TEMP 
JFL— JFL+1 
END  DO 
IORD-IORD+1 
END  DO 


Store  data  in  DSS  file 

3500  CALL  ZOPEN ( IFLTAB, CFNDSS, IODSS) 

JVAR-1 

DO  WHILE  (JVAR.LE.NVAR) 

CPNPRT(l)-ID_RIV_NAME(IX_LOC(JVAR) ) 

CALL  CHRLNB (CPNPRT (1) .NPNPRT (1) ) 

JX  PARAM— IX__PARAM ( JVAR) 

IFTINDEX(ID_PARAM_NAME(JX_PARAM)  ,  'RELEASE'  )  .EQ.l  .OR. 

INDEX  (ID  PARAM_NAME(JX_P  ARAM), 'FLOW')  .EQ.l)  THEN 
CPNPRTT2 )  -ID_LOC_NAME_FLOW  ( IX_LOC  ( JVAR)  ) 

ELSE 

CPNPRT  (2)  — ID_LOC_NAME  ( IX_LOC  (JVAR)  ) 

ENDIF 

CALL  CHRLNB (CPNPRT (2) .NPNPRT (2) ) 

CPNPRT(3)=ID_PARAM_NAME(IX_PARAM(JVAR)  ) 

CPNPRT(3)-ID_PARAM  PNPRT  ( IX_P  ARAM  (JVAR)  ) 

CALL  CHRLNB(CPNPRTT3) ,NPNPRT(3) ) 

CPNPRT (5) -CNTRVL 

CALL  CHRLNB (CPNPRT (5) .NPNPRT (5) ) 

CALL  ZPATH (CPNPRT (1 ) , CPNPRT (2) ,CPNPRT<3) ,CPNPRT(4) ,CPNPRT(5> , 
CPNPRT (6) , CPATH (JVAR) , NPATH ( JVAR) ) 

JX  PARAM=IX_PARAM  (JVAR) 

IFTlNDEX(ID_PARAM_NAME(JX_PARAM)  ,'KAF'  )  . GT . 0 )  THEN 
CUN ITS—' KAF' 

ELSE  IF  ( INDEX  ( ID_PARAM_NAME  ( JX_PARAM)  ,  '  1000AF'  )  .  GT .  0)  THEN 
CUNITS-'KAF' 

ELSE  IF (INDEX ( I D_P ARAM_N AME (JX_PARAM> ,' 1000  AF').GT.0)  THEN 
CUNITS-'KAF' 

ELSE  IF (INDEX (ID  PAPAMNAME (JXPAPAM) , ’ FT' ) .GT.0)  THEN 
''IN ITS-' FT' 
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ELSE  IF ( INDEX ( I D_P ARAM_NAME { JXPARAM) , ' KCFS '  )  *  GT .  0 )  THEN 
CUNITS— ' KCFS ' 

ELSE  IF ( INDEX { ID_PARAM_NAME ( JX_P ARAM) , ' 1000CFS' ) .GT.O)  THEN 
CUNITS-' KCFS' 

ELSE  IF < INDEX  < ID_PARAM_NAME ( JX_PARAM) , ' KMWH ' ) . GT . 0 )  THEN 
CUNITS— ' KMWH' 

ELSE  IF  ( INDEX  (ID_P ARAM  NAME  ( JX  PARAM)  ,  '  MW' )  .GT.O)  THEN 
CUNITS-' MW' 

ELSE  IF ( INDEX <ID_P ARAM  NAME ( JX  PARAM) , ' LENGTH  MO' ) .GT.O)  THEN 
CUNITS-' MONTHS' 

ELSE 

CUN ITS-'  ' 

END  IF 

C 

IF ( INDEX ( I D_P ARAM_NAME ( JVAR) , ' STORAGE ' ) . GT . 0 )  THEN 
CTYPE-' INST-VAL' 

ELSE  IF ( INDEX ( ID_PARAM_NAME (JVAR) , ' POOL  ELEV' ) . GT . 0)  THEN 
CTYPE-' INST-VAL' 

ELSE  IF ( INDEX (ID_PARAM_NAME ( JVAR) , 'PEAK  POWER' ). GT . 0 )  THEN 
CTYPE-' INST-VAL' 

ELSE  IF ( INDEX ( ID_P ARAMNAME ( JVAR) , ' ENERGY' ) . GT . 0 )  THEN 
CTYPE-' PER -CUM  ' 

ELSE  IF(INDEX(ID_PARAM_NAME(JVAR),'NAV  LENGTH' ) .GT.O)  THEN 
CTYPE— ' INST-VAL' 

ELSE 

CTYPE—' PER-AVER' 

END  IF 

C 

IP LAN— 0 

ISDATA— 1+ { JVAR-1 ) *NPER 

CALL  ZSRTS  (IFLTAB, CPATH (JVAR) (1 :NPATH (JVAR) ), DATWIN (1) 2400' , 
.  NPER,TSDATA( ISDATA) , CUNITS, CTYPE, I PLAN, IER03) 

C 

JVAR— JVAR+ 1 
END  DO 

CALL  Z CLOSE (IFLTAB) 

C 

C  It's  all  over  folks  I 

C  - - - 

9000  STOP 
END 
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c 


c 

c 


c 

c 


c 

c 


c 


c 


c 


BLOCK  DATA 

INCLUDE  'IO.CBL' 
include  'param.cbl' 

DATA  LERROR/. FALSE./ 

DATA  KDI,KDO,KUTR  /5,6,29/ 

DATA  LECHO/ .TRUE./ 

DATA  CDELM/',-  '/ 

DATA  CIDMON  /'  JAN'  ,  '  FEB'  ,  '  MAR'  ,  '  APR'  ,  'MAY'  ,  '  JUN'  ,  '  JUL'  , 
.  ' AUG' , ’ SEP' , ' OCT' , ' NOV' , ' DEC' / 

DATA  DAYMON/31,28,31,30,31,30,31,31,30,31,30,31/ 


DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


ID_PARAM 
ID_PARAM" 
I  DP  ARAM' 
ID_PARAM' 
ID_PARAM" 

idparam' 

I  D  P  ARAM' 
ID_PARAM‘ 

id_param' 

ID_PARAM 
ID_PARAM 
ID_PARAM 
ID_PARAM 
ID_PARAM 
ID  PARAM' 


NAME (  1) 
'NAME  (  2) 
'NAME  (  3) 
'NAME  (  4) 
'NAME  (  5) 
'NAME(  6) 
'NAME  (  7) 
NAME (  8) 
'NAME  (  9) 
"name  (10) 
'NAME  (11) 
’NAME  (12) 
'NAME  (13) 
“NAME  (14) 
'NAME  (15) 


/'REACH  INF. KAF 
/'EVAP,1000  AF 
/' INF  ADJST,KAF 
/'MOD  INF, KAF 
/'STORAGE, KAF 
/'POOL  BLEV, FT 
/'RELEASE,  KAF 
/' RELEASE,  KCFS 
/' AVE  POWER, MW 
/'PEAK  POWER, MW 
/' ENERGY,  KMWH 
/'NAV  LVL, KCFS 
/' NAV  LENGTH  MO 
/'FLOW,  1000AF 
/'FLOW,  1000CFS 


'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 


DATA  ID_PARAM_PNPRT{  1 )  / '  FLOW_LOC_INC  '/ 

DATA  ID_PARAM_PNPRT(  2)/'EVAP  '/ 

DATA  ID_PARAM_PNPRT(  3) /' FLOW  LOC  DPL  '/ 

DATA  ID_PARAM_PNPRT(  4 )  / '  FLOW_LOC  '/ 

DATA  ID_PARAM_PNPRT  (  5)/'STOR  '/ 

DATA  ID  PARAM  PNPRT  (  6)/'ELEV  '/ 

DATA  ID  PARAM  PNPRT  (  7) /'FLOW  '/ 

DATA  ID_PARAM_PNPRT(  8) /'FLOW(KCFS)  '/ 

DATA  ID  PARAM_PNPRT(  9) /'AVE  POWER, MW  '/ 

DATA  ID_PARAM_PNPRT(10)/'PEAK  POWER, MW  '/ 

DATA  ID_PARAM_PNPRT  (11)  /  'ENERGY  '/ 

DATA  ID_PARAM_PNPRT(12)/'FLOW_NAV_LVL(KCFS)  '/ 
DATA  ID_PARAM_PNPRT(13)/'MON_NAV_LENGTH  '/ 

DATA  ID  PARAM  PNPRT  (14)  /  '  FLOW  '  / 

DATA  ID_PARAM_PNPRT(15)/'FLOW(KCFS)  '/ 

DATA  ID_LOC_NAME(  1)/'FTPK  '/, 

.  ID  RIV_NAME(  1)/' 

DATA  ID_LOC_NAME(  2)/'GARR  T/, 

ID  RIV_NAME(  2)/' 
DATA  ID_LOC_NAME(  3)/'OAHE  T/, 

ID  RIV_NAME(  3)/' 
DATA  ID_LOC_NAME(  4) /'BEND  T/, 

.  ID  RIV_NAME(  4)/' 

DATA  ID_LOC_NAME(  5)/'FTRA  r/, 

ID  RIV_NAME(  5)/' 
DATA  ID_LOC_NAME(  6)/'GAPT  T/, 

ID  RIV_NAME (  6)/' 
DATA  ID_LOC_NAME(  7) /'SYS  T/, 

ID  RIV_NAME(  7)/' 
DATA  ID_LOC_NAME  (  8)/'SUX  T/, 

ID  RIV_NAME(  8)/' 
DATA  ID_LOC_NAME(  9)/'OMA  T/, 

ID  RIV_NAME<  9)/' 
DATA  ID_LOC_NAME(10)  /'  NCNE  T/, 

ID  RIV_NAME(10)/' 
DATA  ID_LOC_NAME(ll) /'MKC  T/, 

ID  RIV_NAME(11)/' 
DATA  ID_LOC_NAME(12)  /'BNMO  t/, 

ID  RIV_NAME(12) /' 
DATA  ID_LOC_NAME(13)/'HEMO  r/, 

ID_RIV_NAME  (13) /' 

DATA  ID_LOC_NAME_FLOW<  1 ) /' FTPK-GARR' / 

DATA  ID_LOC_NAME_FLOW(  2)  /'GARR-OAHE'  / 

DATA  ID_LOC  NAME  FLOW(  3) /'OAHE-BEND' / 

DATA  ID_LOC~NAME~FLOW(  4  )  / '  BEND-FTRA'  / 

DATA  ID_LOC~NAME  FLOW(  5) /'  FTRA-GAPT'  / 

DATA  ID_LOC_NAME_FLOW(  6)  /'GAPT-SUX  '/ 

DATA  ID  LOC_NAME~FLOW<  7)  /'SYS  '/ 

DATA  ID^LOC_NAME_FLOW  (  8)  /'  SUX-OMA  '/ 

DATA  I D_LOC_NAME_F LOW (  9) / ' OMA-NCNE  '/ 

DATA  I  D_LOC_NAME_FLOW  (10)/'  NCNE-MKC  '  / 

DATA  ID_LOC_NAME  FLOW (11)/' MKC-BNMO  '/ 

DATA  lD_LOC_NAME~FLOW(12) / ' BNMO-HEMO' / 

DATA  ID  LOC  NAME  FLOW ( 13 ) / ' HEMO-STL  '/ 


END 


'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 

'/ 
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Block  Data  for  RDMATF 
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Common  Blocks  for  RDMATF 


C  BLOCK  10 

PARAMETER  (KINREC-132) 

CHARACTER  CINREC+  (KINREC) , BINREC*  (KINREC)  ,CAPINP*  (KINREC)  , 

.  CDELM* 5 , CSYSDA*  9, CSYSTM* 8 , CPROGN *17, CIDMON (12) *3,  CTEMP* 1 32 , 

.  EJECTP*1 

COMMON  /IOC/  CINREC , BINREC, CAP INP , CDELM, CSYSDA, CSYSTM, CPROGN, 

.  CIDMON, CTEMP, EJECTP 
C 

PARAMETER  (KFL-30) 

LOGICAL  LBATCH, LERROR, LSTOP , LEOF, LECHO, LNEWBA, LB LANK, LCOMND, 

. LDTK14, LDCALC, LVERIF, LPRMPT, LEXIT, LFINIS, LNEXT, LALL, LCCPL,  LHPPL, 

.LVERPL, LZETPL, LOPENP 

C 

INTEGER  NFL, IBF (KFL) , IEF (KFL) , LNF (KFL) , IDT (KFL) , IDP (KFL) , 

. ITBL ( 128) , KDI , KDO, KOTR, KDNME, KDDES, KDTR, ISYSMN, NPROGN, DAYMON (12) 

HARRIS 
IBM-PC 

REAL  DYCPU1 , DYCPU2, FCP01 , FCPU2 

COMMON  /IO/  NFL, IBF, IEF, LNF, IDT, IDP, ITBL, KDI, KDO, KDTR, KDNME, KDDES, 

.  KDTR,  MS  YSDA,  ISYSMN,  LBATCH,  LERROR,  LSTOP ,  LEOF,  LECHO,  LNEWBA,  LB  LANK  , 

. LCOMND ,  LDTK14 ,  LDCALC,  LVERIF ,  LPRMPT ,  LEXIT ,  LFINIS,  LNEXT,  LALL,  LCCPL, 

.LHPPL, LVERPL, LZETPL, NPROGN, LOPENP, DAYMON, DYCP01 , DYCPD2, FCPD1 , FCP02 


INTEGER  MSYSDA 
INTEGER* 4  MSYSDA 


param 


PARAMETER  (KU_PARAM_NAME«15,  KD_L0C_NAME-13) 

CHARACTER  ID_PARAM_NAME  (KU  PARAM  NAME)  *  15, 

.  ID_LOC_NAME(KU_LOC_NAME)T6,  ID  RIV_NAME  (KD_LOC_NAME)  *20, 
.  ID_LOC_NAME_FLOW(KD_LOC_NAME)  *70, 

.  ID_PARAM_PNPRT(KO_PARAM_NAME)*20 

COMMON  /PARAM/  ID  PARAM  NAME,  ID_LOC_NAME,  ID_RIV_NAME, 

.  ID  LOC  NAME  FLOW,  ID  PARAM  PNPRT 
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Purpose  of  MENUPRM 


MENUPRM  assists  the  user  in: 

Assigning  a  subdirectory  to  each  study. 

Selecting  a  study  and  moving  to  the  associated  subdirectory. 

Selecting  the  desired  computer  program. 

Selecting  files  needed  by  the  selected  program.  Includes  ASCII 
input-output  files,  ASCII  macro  &  function  files,  and  binary  files 
such  as  HEC-DSS  data  files. 

Listing  existing,  appropriate  files  for  the  selected  file  in  the  menu. 
(F5) 

Editing  files  using  the  COED  editor.  For  the  HEC-PRM 
program,  the  following  options  are  invoked:  (1)  Full  Screen 
Editing,  (2)  Help  Program  feature.  (Alt-E) 

Editing  files  using  the  alternative  editor  "Blackbeard"  from  Lahey 
Computer  Systems.  (Alt-B) 

Deleting  the  highlighted  file.  (Alt-D) 

Executing  the  selected  program.  MENUPRM  generates  the 
appropriate  command  line  including  any  file  assignments.  (Alt- 
X) 

Viewing  the  output  from  the  program.  The  "LIST.COM" 
program  is  used  to  list  ASCII  files.  It  allows  convenient  viewing 
of  files  which  have  a  character  width  greater  than  80.  (Alt-L) 

*  Printing  files  to  the  printer.  The  DOS  command  "PRINT"  is  used 
perserving  character  column  1.  (Alt-P) 

Automatically  post-processing  results  from  HEC-PRM  using  the 
programs  PRMPOST  and  MATHPK. 
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Brief  Description  of  MENUPRM  Screens 


Assigning  a  subdirectory  to  each  study. 

MENUPRM  allows  you  to  assign  a  subdirectory  to  a  study  name. 

After  the  banner  page,  select  "create  new  study"  to  define  a  new  study. 
There  is  no  online  directory  tree  information  —  you  must  know  the 
subdirectory  into  which  your  data  will  be  entered.  If  the  subdirectory 
does  not  exist,  it  will  be  created. 


Selecting  a  study  and  moving  to  the  associated  subdirectory. 

Each  time  the  MENUPRM  is  started,  you  may  select  an  existing  study. 
MENUPRM  will  change  to  the  selected  study  and  physically  move  you 
to  the  associated  subdirectory. 


Selecting  the  desired  computer  program. 

After  the  "select  study"  list,  MENUPRM  displays  a  list  of  computer 
programs  which  are  accessable  from  the  menu.  The  user  may  select  a 
program  by  either  (1)  entering  the  number  followed  by  pressing  the 
"Enter"  key,  or  (2)  highlighting  the  program  using  the  cursor,  home,  or 
end  keys  and  pressing  the  "Enter"  key. 
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Selecting  files  needed  by  the  selected  program. 


The  files  which  the  user  defines  through  MENUPRM  include  ASCII 
input-output  files,  ASCII  macro  &  function  files,  and  binary  files  such 
as  HEC-DSS  data  files. 

For  each  program,  MENUPRM  lists  appropriate  files  needed  by  the 
program  for  input  and/or  output.  The  user  may  enter  names  for  any  of 
the  files  or  all  or  let  them  revert  to  defaults.  Some  files  should  be 
defined  as  the  default  is  not  a  good  or  practical  solution.  For  example, 
the  ASCfi  HEC-PRM  input  file  should  be  defined  as  a  file  into  which 
fixed-formatted  input  is  entered.  The  default  is  the  keyboard  which 
not  a  practical  source  of  HEC-PRM  input  information. 

The  files  are  defined  by  moving  the  highlighted  cursor  to  the  desired 
file  and  entering  the  filenames. 


Listing  existing,  appropriate  files  for  the  selected  file  In  the  menu. 

Existing  files  may  be  displayed  in  a  box  on  the  screen  and  the  desired 
file  may  be  selected  by  cursoring  to  that  file  and  pressing  the  "enter" 
key.  The  list  is  obtained  by  highlighting  the  desired  type  of  file  in  the 
"define  data  files"  menu  and  then  pressing  the  "F5”  function  key.  All 
files  have  an  associated  filename  extension.  For  example,  the  HEC- 
PRM  ASCII  input  data  files  all  have  the  extension  ".PRI"  and  the 
output  data  files  the  extension  ".PRO".  When  the  user  presses  the  F5 
key  for  HEC-PRM  input,  MENUPRM  will  list  all  files  that  have  the 
extension  ".PRI". 
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Editing  files  using  the  COED  editor. 


When  editing  files  using  the  COED  text  editor  with  the  HEC-PRM 
program,  the  following  options  are  automatically  invoked  by 
MENUPRM:  (1)  Full  Screen  Editing,  (2)  Help  Program  feature.  To 
edit  an  ASCII  file  with  COED,  highlight  the  file  in  the  "define  data 
files"  menu  and  press  the  keys  "Alt-E".  If  the  file  is  some  other  file 
besides  the  HEC-PRM  ASCII  input  data  file,  MENUPRM  invokes 
COED  in  full  screen  but  without  the  help  program  feature. 

A  new  HEC-PRM  input  data  file  is  created  by  defing  the  file,  editing 
the  file,  and  entering  records  in  the  proper  order.  A  similar  existing 
file  may  be  used  as  a  starting  point  for  the  new  file.  To  use  it,  it  may 
be  either  (1)  copied  to  the  new  file  when  you  are  at  the  DOS  prompt 
or  (2)  Retrieved  into  the  new  file  using  the  COED  command  "Get". 

To  "GET"  the  existing  file,  edit  the  new  file  ("alt-e"),  press  the  line 
edit  mode  key  F10,  enter  the  command  "GET  filename"  where 
"filename"  is  the  name  of  the  existing  file. 

To  use  the  "help  Program"  feature,  you  may  move  the  cursor  to  any 
record  in  the  HEC-PRM  ASCII  input  data  file  and  press  "Alt-Fl".  If 
the  cursor  is  positioned  on  the  first  two  columns  of  input,  COED 
gives  more  general  information  about  that  record.  If  it  is  positioned  in 
some  data  field,  information  specific  to  that  data  field  is  displayed. 

To  get  online  information  about  the  COED  editor,  press  the  FI  key. 


Editing  flies  using  the  alternative  editor  "Blackboard''  from  Lahey  Computer 

Systems. 

COED  works  very  poorly  in  full  screen  mode  if  data  files  contain 
more  than  80  characters  of  information.  Moreover,  if  you  start  with  a 
file  which  contains  less  than  81  characters  but  add  information  beyond 
80  characters,  the  additional  characters  will  be  lost.  While  this  is  not  a 
problem  for  HEC-PRM  ASCII  input,  it  can  be  a  problem  for  other 
files  such  as  the  PREAD  macro  files.  While  the  Blackbeard  editor 
probably  will  not  be  included  with  HEC-PRM  distribution,  some 
means  of  invoking  an  alternative  editor  to  COED  will  be  provided.  To 
invoke  the  Blackbeard  editor,  the  filename  is  highlighted  in  the  "define 
data  files"  menu  and  the  keys  "AIt_b"  are  pressed. 


Deleting  the  highlighted  file. 

A  file  may  be  deleted  by  highlighting  it  in  the  "define  data  files" 
menu.  To  delete  a  file,  press  the  "Alt-d"  keys.  MENUPRM  will  ask 
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you  to  coofirm  that  you  wish  to  delete  the  selected  file. 


Executing  the  selected  program. 

MENUPRM  generates  the  appropriate  command  line  including  any  file 
assignments. 

The  selected  program  may  be  executed  from  either  the  "select 
program"  menu  or  the  "define  data  files"  menu.  To  execute  the 
selected  program,  press  the  "Alt-x"  keys.  On  the  "select  program" 
menu,  the  cursor  must  highlight  the  desired  program.  On  the  "define 
data  files"  menu,  the  cursor  may  be  positioned  on  any  filename  or  on 
the  "default  extension"  block. 


Viewing  the  output  from  the  program. 

The  "LIST.COM"  program  is  used  to  list  ASCII  files.  It  allows 
convenient  viewing  of  files  which  have  a  character  width  greater  than 
80. 

To  view  output  from  "batch"  program  such  as  HEC-PRM,  highlight 
the  output  results  rile  name  and  press  the  keys  "Alt-L".  The 
MENUPRM  will  invoke  the  "LIST.COM”  program  so  that  you  can 
view  the  output  from  the  program.  Cursor  keys  control  up,  down,  left, 
and  right  movement.  PgUp  and  PgDn  move  in  paging  fashion.  Other 
controls  are  available.  Limited  online  information  is  available  by 
pressing  the  FI  key. 

If  you  try  to  "list"  an  HEC-DSS  data  file,  MENUPRM  will  instead  try 
to  list  the  associated  catalog  file.  For  example,  if  you  try  to  list  the 
file  "MRDDSS",  MENUPRM  will  instead  try  to  list  the  file 
"MRD.DSC". 


Printing  files  to  the  printer. 

The  DOS  command  "PRINT"  is  used  perserving  character  column  1. 
Any  file  listed  in  the  "define  data  files”  menu  may  be  sent  to  your 
printer  by  pressing  the  "Alt-P"  keys.  You  should  use  caution  in  doing 
this  as  some  files  are  quite  large  and  it  is  not  practical  to  print  than. 
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Automatically  post-processing  results  from  HEC-PRM  using  the  programs 

PRMPOST  and  MATHPK. 


When  you  execute  HEC-PRM,  MENUPRM  will  ask  you  "Do  you 
want  to  automatically  post-process  HEC-PRM  results".  If  you  answer 
yes,  MENUPRM  generates  commands  in  the  file  "runfile.bat"  to 
execute  HECPRM.EXE,  PRMPOST.EXE,  and  MATHPK.EXE. 
Program  PRMPOST.EXE  generates  output  similar  to  MRD’S  long 
range  planning  model  program.  Program  MATHPK  calculates 
parameters  and  tabulates  results  to  a  tabulation  file  in  a  vertical  format. 
In  addition  to  adding  the  command  lines  for  post-processing, 
MENUPRM  generates  input  data  for  these  programs  that  corresponds 
to  the  time  window  and  alternative  which  is  analyzed  by  HEC-PRM. 

PRMPOST  has  pathname  parts  hardwired  within  the  program  — 
modifications  require  mondifications  to  the  FORTRAN  source  code. 

MATHPK  utilizes  extensive  PREAD  macros  to  define  pathname  parts 
and  perform  computations.  The  user  has  access  to  these  macros  and 
may  make  changes  as  appropriate. 
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Programs  Associated  With  HEC-PRM 


Currently,  12  programs  can  be  accessed  by  MENUPRM.  They 
include: 

HEC-PRM 

PRMPOST 

DSS-DSSUTL 

DSS-DSPLAY 

DSS-MATHPK 

DSS-DSSPD 

DSS-DSSTS 

RDMATF 

RDATAO 

DSS-DSSTXT 

ABSL01  and 

VI. 

Each  program  has  specific  roles  to  play  in  the  overall  computational 
picture.  The  following  is  a  brief  description  of  each  program’s  role 
and  it’s  associated  menu. 
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Figure  30  HEC-PRM  Data  Relationships 


Figure  31  HEC-PRM  Input  Data  Development 
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Figure  32  HEC-PRM  Post-Processing 
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Figure  34  Study  List  Menu 


tUC-FIM  Package 
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The  "select  study"  menu  is  displayed  after  the  banner  menu.  From 
here,  the  user  may  select  an  existing  study  or  by  highlighting  the  study 
"select  new  study",  the  user  may  define  a  new  study.  For  each  study, 
there  is  an  associated  subdirectory  to  which  MENUPRM  physically 
places  the  user  upon  selection.  You  should  keep  all  files  associated 
with  one  study  in  one  subdirectory  and  you  should  keep  only  one 
study  in  a  single  subdirectory. 
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Figure  35  List  of  Programs  Menu 
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Following  the  "select  study"  menu,  MENUPRM  displays  the  "select 
program"  menu.  The  user  may  execute  any  of  the  programs  from  this 
menu  if  all  necessary  files  for  that  program  have  already  been  defined. 
However,  if  any  necessary  file  has  not  been  defined,  the  user  must 
select  the  program  by  either:  (1)  entering  the  program’s  number  and 
pressing  the  "enter”  key,  or  (2)  highlighting  the  desired  program  and 
pressing  the  "enter"  key.  MENUPRM  the  proceeds  to  the  "define  data 
files"  menu  for  the  selected  program.  To  execute  a  program  from  the 
"select  program"  menu,  highlight  the  desired  program  and  press  the 
"Alt-X"  keys. 
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Figure  36  HECPRM  Data  Files 


-HEC-PRM  Package 
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Output  Infornation . . 

Results  fros  HECPRM  CHECDSS  file). . .  15V0D.DSS 
Input  Flow  data  CHECDSS  file). . .NRD.DSS 
Input  Penalty  Functions  CHECDSS  fi le) . . .PEHCMP. 

Default  extensions. .  Ves 


Keyboard 


F5  File  directory 
Keyboard  Edit  filename 
F10  Exit  to  DOS 
flit  nenu :  (D)elete  CEJdit 


F2  reset  filenames  to  initial  definition 
T1  moues  cursor,  up/doun 
Hone, End  rioues  cursor,  first/last  option 
CL)ist  (P)rint  elXlecute 


-Menu 


The  HEC-PRM  model  requires  the  user  to  define  5  files  ---  they  all 
must  be  defined.  The  Input  Data  file  contains  data  in  an  ASCII 
format.  The  user  normally  invokes  the  COED  editor  to  enter 
information  in  this  file.  The  information  includes  a  lia:  of  nodes  and 
links,  the  time  window,  time  series  pathnames,  and  penalty  function 
pathnames.  When  this  file  is  defined,  the  Output  Information  file  and 
the  Results  from  HEC-PRM  file  are  defined  by  automatically 
appending  the  default  file  extensions  to  the  input  data  file  name. 

The  input  flow  data  is  stored  in  the  HEC-DSS  data  file  "MRD.DSS" 
and  the  penalty  functions  are  stored  int  he  HEC-DSS  data  file 
"PENCMP.DSS".  These  files  can  be  easily  be  defined  by  getting  a  list 
of  all  DSS  data  files  by  pressing  the  "F5"  function  key. 
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Figure  37  List  of  Pertinent  Files 


The  input  flow  data  is  stored  in  the  HEC-DSS  data  file  "MRD.DSS" 
and  the  penalty  functions  are  stored  int  he  HEC-DSS  data  file 


Figure  38  List  of  Pertinent  DSS  Data  Files 

- HEC-P*  Package  - 


^ *TI 


1  D i rectory  of : 

D  :\DAfftSHECPMf\HRDS  WORKSHOP 

Page  1  of  1 

EXNPL1.DSS 

HECPHN.D3S 

I5V0D.0S3 

isyooo.nss 

LAB. DSS 

LABO .DSS 

HAD. DSS 

POCHPA.BSS 
KDtttTF  .DSS 
TSin.DSS 

Keyboard 


Enter  Selects  file 

Esc  Previous  nenu  TJ*-*  nouer  cursor,  up/doun/ lef t/r ight 

P10  Exit  to  DOS  Hone, End  nones  cursor,  first/' last  file 


-nenu  12/1/S1 


The  input  flow  data  is  stored  in  the  HEC-DSS  data  file  "MRD.DSS" 
and  the  penalty  functions  are  stored  int  he  HEC-DSS  data  file 
"PENCMP.DSS”.  These  files  can  be  easily  be  defined  by  getting  a  list 
of  all  DSS  data  files  by  pressing  the  "F5"  function  key. 
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Figure  39  PRMPOST  Data  Files 
I - HEC-r*  rack  age 


Workshop 


Program;  PHHFOSI 


Define  data  flies 
Input  Data. .  .QjQjQQil] 

Output  Infomation. . . I5V8D.POO 

Tabular  Output . . . 15 TOD . TAB 

Results  free  HECPHH  (HECDSS  f  He). . .  I5V0D.DSS 

Input  Flow  data  (HECDSS  file). . .NRD.DSS 

Input  Penalty  Functions  (HECDSS  fi le) . .  PEHCHP.DSS 

Default  extensions. . .Ves 


F5  F#i  le  directory 
Keyboard  Edit  filename 
F10  Exit  to  DOS 
Alt  menu:  (Dlelete  CEldit 


F2  reset  filenames  tD  initial  definition 
T!  moues  cursor ,  up/down 
Home, End  rioues  cursor,  first/last  option 
(L)ist  (P)rint  elXlecute 


nu  12/1/01 


The  PRMPOST  program  requires  the  user  to  define  6  data  files. 
However,  all  of  the  files  are  automatically  defined  when  the  user 
specifies  the  5  required  files  for  the  HEC-PRM  program.  The  input 
flow  data  file  and  the  input  penalty  function  files  are  the  same,  and  the 
other  files  are  defined  by  appending  the  appropriate  default  extensions 
to  the  input  data  file  from  HEC-PRM. 

Example  input  to  post-process  HEC-PRM  results: 

ALT  5Y0D 

TIME  MARI 965  FEB1970 
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Figure  40  DSSUTL  Data  Files 

- HEC-Pltl  Package 

Study:  HKD  Workshop 
Progran:  DSSUTL 

|  |  Define  data  fill 

User  con  Bards . .  COM 
Output  Messages . . .COM 
HECDSS  file.  .  15V8D.DSS 
Funct  lDn  f  i  le . . .  BSE33 
Macro  file. .  LRENAKEhAC 
Log  file. . .(none) 

Tabulation  file. . .(none) 

Write  ASCII  data  file... (none) 


Default  extensions. . .Ves 


Kegboard 


enu  I2/'1/S1- 


The  primary  DSSUTL  file  that  the  user  must  define  is  the  DSS  data 
file  although  if  it  is  left  blank,  DSSUTL  will  prompt  the  user  for  a 
filename.  The  other  files  are  optional  and  some  of  them  may  be 
defined  by  DSSUTL  input. 
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Figure  41  DSPLAY  Data  Files 

- H EC- Pit!  Package 

Study:  HKD  Workshop 
Frogran:  DSP  LAY 

Define  data  files 

User  conaands. .  .COM 
Output  Messages. . .COM 
HECDSS  file...  I5V8D .  DSS 
Tabulation  output  file...QJEsE 
Screen  file... (none ) 

Function  file... (none) 

Macro  file. . .DSP. HOC 
Menu  f lie. .. (none! 

Log  f ile. . .(none) 

Default  extensions. . .Ves 


Keyboard 


enu  12/1/91- 


The  primary  DSPLAY  file  that  the  user  must  define  is  the  DSS  data 
file  although  if  it  is  left  blank,  DSPLAY  will  prompt  the  user  for  a 
filename.  The  other  files  are  optional  and  some  of  them  may  be 
defined  by  DSPLAY  input. 
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Figure  42  MATHPK  Data  Files 


Study:  MXD  Workshop 


Frogran:  NRTHFX 


Define  data  files 
User  con  Bands . . . I5V9D . HP  t 
Output  Messages  ■ . .  1  i.*Vt  :  1 1 H ,  l « i 
Tabulation  output  file. . . I5V0D.HPT 
Function  f  lie. .  .(none) 

Macro  file..  HPK. MAC 
Log  file... (none ) 

Default  extensions . .  ites 


Seuboard 


F5  File  directory  F2  reset  filenames  to  initial  definition 

Esc  Select  new  program  Ti  moves  cursor,  up/dawn 

F10  Exit  to  CDS  Hone,End  moves  cursor,  first/ last  option 

flit  menu:  [Dlelete  CEldit  (L)ist  (P)rint  elXlecute 


MATHPK  requires  none  of  the  files  be  defined  before  execution. 
However,  for  postprocessing  of  HEC-PRM  results,  MENUPRM 
automatically  defines  an  input  data  and  output  information  file  and 
even  modifies  the  input  data  file  to  provide  appropriate  information. 
Also  critical  to  post-processing  is  the  macro  file  "MPK.MAC".  It  must 
be  defined  by  the  user  before  executing  the  MATHPK  program. 

Example  input  to  post-process  HEC-PRM  results: 

! RUN  DO_PRM  ' I5Y0D'  'PENCMP'  '15X000'  ' MRD'  '5Y0D' 
31MAR1965  28FEB1 970 


Example  input  to  compute  adjusted  local  inflows: 

OP  MRD  1 
OP  HECPRM  2 

TI  31MAR1898  28FEB1990  2400  2400 
! RUN  FLOW_LOC  1991 
FI 
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Figure  43  DSSPD  Data  Files 
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F5  File  directory 
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flit  menu:  (D)elete  CEJdit 


-nenu  12/1/91 


F2  reset  filenanes  to  initial  definition 
T1  notes  cursor,  up/down 
Hone. End  noues  cursor,  first/last  option 
(L)ist  tPlrint  eiXlecute 


The  DSSPD  program  is  used  to  enter  penalty  functions,  hydropower 
energy  coefficients,  and  elevation-area-capacity  curves  into  DSS  data 
files.  For  MRD,  this  data  has  been  entered  in  the  file 
"PENCMP.DSS".  It  is  also  used  to  enter  the  monthly  varying 
depletions  into  the  MRD.DSS  data  file.  When  penalty  functions  are 
developed  in  Lotusl23,  a  .pm  file  is  created  in  the  format  required  by 
the  DSSPD  program.  In  that  case,  the  user  would  define  the  input  data 
file  to  be  the  .pm  file  created  by  Lotus  123. 
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Figure  44  RDMATF  Data  Files 

- HED-PM  Package 
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HECDSS  file.  .  I5V8D.DSS 
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Default  extensions. .. Vfcs 


Keyboard 


F5  File  directory 
Keyboard  Edit  filename 
F10  Exit  to  DOS 
flit  menu:  (Dlelete  CEldit 


F2  reset  filenames  to  initial  definition 
T1  noues  cursor,  up/doun 
Home. End  noues  cursor,  first/last  option 
lL)ist  (P)rint  etXDecute 


-menu  12/'1/'91- 


RDMATF  program  reads  the  "DMATFELE"  which  is  ASCII  output 
from  MRD’s  long  range  planning  model  "ABSL01".  MENUPRM 
adds  a  little  twist  by  requiring  the  "DMATFILE"s  have  the  extension 
".mat".  This  allows  the  user  to  make  multiple  runs  of  Vl.exe  creating 
multiple  "DMATFILE"s  and  then  running  RDMATF,  once  for  each 
file.  The  extension  also  allows  the  user  to  pick  "DMATFILE"s  from  a 
list  generated  by  a  DOS  masked  directory  command  ("dir  *.mat"). 
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Figure  45  RDATAO  Data  Files 
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Default  extensions ... fes 


Keyboard 


F5  File  directory 
Keyboard  Edit  filename 
F10  Exit  to  DOS 
flit  menu :  (D)elete  CEldit 


F2  reset  filenames  to  initial  definition 
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-menu  12/1/91- 


The  RDATAO  program  reads  MRD’s  DODATA  file  and  stores 
evaporation  rates,  inflow,  and  depletions  in  the  DSS  data  file 
"MRD.DSS".  The  user  must  define  the  DSS  data  file  (which  is 
already  defined  if  the  user  defined  data  files  for  the  HEC-PRM 
program)  and  the  "DODATA"  filename.  MENUPRM  adds  a  little  twist 
because  it  requires  the  "DODATA"  file  to  have  the  extension  ".DOD" 
(with  a  zero).  This  allows  the  user  to  store  on  disk  several  files  each 
having  different  levels  of  depletions.  The  only  input  required  of  the 
user  is  to  enter  the  year  of  depletions,  everything  else  is  read  from  the 
"DODATA"  file. 
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Figure  46  DSSTXT  Data  Files 
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F2  reset  filenanes  to  initial  definition 
T1  noues  cursor,  up/down 
Hone. End  noues  cursor,  first/ last  option 
(L)ist  (P)rint  elXDecute 


The  DSSTXT  program  is  a  generalized  program  that  allows  the  user  to 
store  text  information  in  DSS  data  files.  Currently,  the  text  capability 
of  DSS  is  not  being  used  in  any  of  the  HEC-PRM  specific  programs. 
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Figure  47  DSSTS  Data  Files 
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Default  extensions.  .  .  Ves 


Keyboard 


The  DSSTS  program  facilitates  the  entry  of  any  regular  interval  time 
series  data  to  a  DSS  data  File.  For  the  MRD  study,  it  was  not  used 
because  all  of  the  necessary  time  series  information  was  entered  using 
the  RDATAO  program  to  automatically  store  existing  data  in  the  DSS 
data  file. 
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Figure  48  MRD’s  Long  Range  Planning  Model  (L01)  Data  Files 
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MRD’s  long  range  study  program  "ABSL01"  normally  reads  from  the 
G1  and  DODATA  files,  and  writes  to  the  LRSIOUT  files.  By  calling 
the  file  "L01.BAT",  the  input  files  and  the  output  file  can  be  defined 
using  the  MENUPRM.  The  example  shows  its  application  to  define 
files  for  the  time  period  1965-1974  (file  G1B.LRI). 
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Figure  49  MRD’s  Post-Processor  VI. EXE  Data  Files 
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Keyboard 
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Keyboard  Edit  filename 
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F2  reset  filenames  tD  initial  definition 
TL  moves  cursor ,  up/doun 
Hone. End  noues  cursor,  first/last  option 
fLlist  tPlrint  etXlecute 


MRD’s  program  Vl.EXE  normally  reads  from  the  files  LASTGR.GRF 
and  LRSIOUT  which  is  created  by  the  ABSL01  program  and  writes 
information  to  the  "DMATFILE”.  MENUPRM  allows  the  user  to 
define  these  files  with  the  extensions  ".GRF",  ".LRO”,  and  ".MAT” 
respectively.  MENUPRM  creates  DOS  commands  to  copy  the  x.grf 
file  into  LASTGR.GRF,  the  x.lro  file  into  LRSIOUT  before  executing 
VI.  After  VI  is  through,  the  LASTGR.GRF  file  is  copied  back  to 
x.grf  and  the  DMATFILE  is  copied  into  the  x.mat  file.  The  use  of  the 
file  extension  is  compatible  with  the  extensions  used  for  "L01.BAT”. 
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Figure  50  Example  Prompt  to  Post-Process  HEC-PRM  Results 
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This  is  the  prompt  MENUPRM  displays  before  executing  HEC-PRM. 
To  post-process  HEC-PRM  results,  the  most  desirable  option  is  to 
enter  "yes"  (y)  to  this  prompt.  MENUPRM  automatically  generates 
input  for  the  PRMPOST  and  MATHPK  programs  and  will 
automatically  execute  them  after  HEC-PRM  is  complete. 
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